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まえ が き 


パー ソナ ルコ ンピュータ PC-8001MKI (に は 。 N-BASIC と 
Nso-BASIC と いう 2 つの BASIC モー ド が あり ます 。 N-BASIC は , 本 
機 の 姉妹 機種 に あたる PC-8001 と 同じ も の で 。 既に 国内 で は 御 好 評 を い 
た だ いて お り ま す 。 Nso-BASIC は その N-BASIC に 拡張 機能 を 付加 し た 
プロ グラ ミン グ 言 語 で , PC-8001MKI の ハー ドウ エア を 活か し た プロ グ 
ラム ょ を 容易 に 作成 する こと が で きま す 。 

本 書 は と これ ら の BASIC の 命令 を 個々 に つい て , 詳細 に 解説 し た リフ 
ァ レ ンス マニ ュ ア ル で す 。 と の マニ ュ ア ル を 読む 前 に , PC-8001MKI ュ 
ー ザ ー ズ マニ ュ ア ル を よく 読ん で , 基本 的 な 繰 作 方 法 を , 習得 する と と を 
お 和 勧め し ます 。 

ュー ザ 各 位 が この リフ ァ レ ンス マニ ュ ア ル を 熟読 され , 優れ た 機能 を 
持つ BASIC の ソフ トウ エア が , 数 多く 作り 出さ れる と と を 期待 いた し 
ます 。 




















この マニ ュ ア ル の 構成 


本 書 は 各 機能 , 命令 な ど を 分 か りや すく する た め , 1, 2 章 の 旬 
章 と APPENDIX と いう 構成 に な っ て いま す 。 

また だ Nso-BASIC と N-BASIC の 解説 は 分 離せ すず 一括 し て 行い ます 。 た 
だ し , Nso-BASIC の 方 が N-BASIC の 上 位 互換 性 を 持っ て いま すか ら . 
原則 と し て Nso-BASIC を 題材 に し , 特に 内 容 の 異な る も の や 片方 に し か な 
い 機 能 の 解説 の 場合 は その つど Nso-BASIC, N-BASIC と 明記 し て あり ま 
す 。 

まだ サンプ ブル プロ グラ ム に つい て は , N-BASIC 専用 命令 の 解説 を 除 
いて , すべ て Nso-BASIC を 題材 と し て 作ら れ て いま す 。 実際 に 試し て み 
る 場合 は Nso-BASIC の モー ド で 実行 し て くだ さい 。 


た で 























1 章 Nso-BASIC(N-BASIC ) の 概要 


N。.BASIC(N-BASIC) の 特徴 や 機能 を コマ ンド ・ ス テー トメ ント な どの 
説明 に 先だって 解説 し て いま す 。 そ の 内 容 は , BASIC 言語 の 定数 , 変 
多 の 味 , 演算 の 決ま りな ど , BASIC 言語 を 使う 上 で の 最低 限 の 知識 
こと, Nas。-BASIC に 新しく 追加 され た 機能 の 紹介 や , それ を 使う 上 で の 知 
識 で す 。 こ と これ ら は 2 章 , 文法 の 説明 を 理解 する 上 で どう し て も 必要 な 事項 
で す 。 必ず 読む よう に し て くだ さい 。 


















コマ ンド ・ ス テー トメ ント ・ 関 数 ・ 予 約 変数 








BASIC の 機能 は 大 きく 分 け て コマ ンド ・ ス テー トメ ント と 関数 | 
する と と が で きま す 。 

コマ ンド 及び ステ ー ト メン ト は BASIC が 持つ 命令 で 。 コマ ンド は 一 
般 じ に ダイ レク トモ ー ド で 使用 する も の で 実行 後 "Ok" が 表示 され ます 。 
ステ ー ト メン ト は 主 に プロ グラ ム 中 で 使用 し ます ( 明 催 に 分 か れ て いる 誠 
で は な い )。 

関数 は 何ら か の 命令 に 付随 し て 引用 され る 機能 で す 。 











2 


付 録 
と こと で は , ファ イル の 作り 方 , 機械 語 プ ログ ラム の 作り 方 や 各種 の 一 
覧 表 な ど を まとめ て 取り 扱っ て いま す 。 


ee 





Nso-BASIC 
リフ ァ アレ ンス マニ ュ ア ル 


第 1 章 N -BASIC の 概要 
1 1 Nso-BASIC と N-BASIC ドーー ド ーー ドド ドー ドド トド トッ ッッ ーーー 1 1 
1.2 Nao-BASIC の 主 な 特徴 ドド ドド ドド ドド ドド ドレ ピー ピー バー 1 一 1 
1.3 動作 モー ドー ト ーー ドド て て て ド し に て て て いよ ここ て て ここ こく こい 1 
5 和 1 一 3 
を 生生 So 林地 吉 本 1-3 
1.6 使用 で きる 文字 と コン トロ ー ル キャ ラク タ ・・・…・・ 1-4 
1 ./ 特殊 記号 の 使い 方 ーー ドド ドド ドド に に に に に に に て パパ パッ ・ 1 一 4 
人 幸生 1-$ 
1 給 1 旨 只 孤 入 特電 1 8 
1.10 型 変換 ・・・・・ ド トー トト トト トト トト トト トッ トト トッ ここ ここ ここ ・ 1-9 
1.11 式 と 演算 ・・・ 上 ーーー トド トト トト トド ト トト トト トト トト トト し ここ 1 1 1 
1.12 廊 宰 列 の 演算 ・・・・・・ ト トバ トト トー トド トー トト ・ ト トト トト て て ここ ここ 1 一 17 
1 .13 演算 の 優先 順位 ーー ニーーーーーーー ニ トド トド トド トド トト トト ここ ここ ここ 1-18 
1 14 エラ ーー メッセ や セー ジロ ーー ドド ドド トド トド トト トト た た た た で た で た で で で や で で いく や 1 1 
0 3 全量 億 人 台 : 森 1 -19 
1.16 グラ フィ ッ ク 座 標 ドド ドド ドド ドド に に に に に に に に に ピピ にし 1-22 
7 ゼ ョ ー 江 0Y0S WI20009WW Peeeyeseeesewees に 323 
1.18 座標 の 指定 の 仕方 ・・ー に バト ーーーーーーーー・ーーーーーーーー 1 - う 6 
| 生生 1-28 
「 革 1 た まそ アキ マイ ミッ トー トッ ーー ツテ イアー ンー 1-30 


還 


第 2 章 コマ ンド ・ ス テー トメ ント ・ 関 数 ・ 予 約 変数 


2 章 の みか た 
ABS 

ASC 

AIN . 
ATTR$ 
AUTO 

BEEP 

CDBL 

CHR$ 

CINT 
CLEAR 
CLOAD 
CLOAD? 
CLOSE 

CMD BLOAD 
CMD BSAVE 
CMD CIRCLE 
CMD CLS 
CMD COLOR 
CMD COLOR@ 
CMD COPY 
CMD GET@ 
CMD INIT 
CMD LINE 
CMD PAINT 
CMD POINT 
CMD PRESET 
CMD PSET 
CMD PUT@ 
CMD SCREEN 
CMD VIEW 
COLOR 
CONSOLE 
CONT 

COS . 
CSAVE 
CSNG 
CSRLIN 


CVI/CVS/CVD 

DATA 

DATES 

DEF FN に 3 

DEF INT/SNG/DBL/ 
STR . 

DEF USR 

DELETE 

DIM 

(1) DSKF 

(2) DSKF 

DSKIS$ 

DSKO$ 

END 

EOF 

ERASE 

ERL/ERR 

ERROR 

EXP 

FIELD 

FILES/LFILES 

FIX 5 

FOR…TO…STEP 一 
NEXT 

FORMAT 

FPOS 

FRE 

GET 

GET@ ls 

GOSUB --RETURN 

GOTO/GO TO 

HEX$ 


IF…THEN…ELSE/IF… 


GOTO…ELSE 
INIT% 
INKEY$ 
INP 
INPUT 


= 


・ フー)9 
・ フ ー60 
・ ノ ー62 
・2ー0J 


・ ノ フー64 
・2ー60 
・2ー67 
・2ー66S 

・ ノ ー69 

la ク グー リリ 
ー ・2ー/2 
・ フ ノー/5 

・ フ ー// 

・ フ ノー/6 

・ ノ ー/9 
・2ー60 
・2ー6』】 

・ フ ノー6 う 3 
・2ー64 

・ フ ノー66 

・ ノ ー66 


.2-89 
.2--91 
. 2-92 
. 2-93 
. 2-94 
. 2-95 
. 2-97 
. 2-99 
.2-100 


・ フ ー101 
・ ッ ー102 
・ フ ノー105 
・ フ ノー106 
・ フー!10/ 


INPUT# 
INPUT$ 
INPUT% 
INSTR 

INT 

KEY 

KEY LIST 
KILL 

LEFT$ 

LEN 

LET 

LFILES 

LINE 

LINE INPUT 
LINE INPUT# 
LIST/LLIST 
LOAD 

LOC . . 
LOCATE 
LOF 

LOG 

LPOS 

LPRINT 
LPRINT USING 
LSET/RSET 
MERGE 

(1) MID$ 

(2) MID$ 


MKI$/MKS$/MKD$ 


MON 

MOTOR 

MOUNT 

NAIME 

NEW 
OCT$  . . . . 


ON ERROR GOTO 


ON…GOSUB/ON… 
GOTO 

OPEN 

OUT 

PEEK 


・ フ ー109 
・ フ ー110 
・ フ ー1 12 
・ フ ノー1 13 
・ フ 2ー114 
・ フ ー115 
・ フ ー116 
・ フ ー11/ 
・ フ ー119 
・2ー120 
・ フ ー12] 
・2ー86 

・ フ 2ー122 
・ フ ノー]124 
・2ー125 
・2ー1206 
・2ー128 
・ フー129 
・2ー130 
・ フ ー1 32 
・ フ ノー133 
・ フ ノー134 
・2ー160 
・2ー167 
・2ー135 
・2ー130 
・ フ ー13/ 
・ フ ノー138 
・ フ ノー139 
・ フー141 
・ フ ノー142 
・ ノー]143 
・ フー145 
・ 2ー146 
・ フー14/ 
・2ー148 


・ 2 ノー150 
・ 2 フー151 
・ 2 一 153 
・2ー154 


POINT 

POKE 

PORT 

POS . . 
PRESET 
PRINT/LPRINT 
PRINT# 
PRINT% 


PRINT USING/LPRINT 


USING 
PRINT# USING 
PSET 
PUT . 
PUT@ 

READ 

REM 
REMOVE 
RENUM 
RESTORE 
RESUME 
RIGHT$ 

RND 

RSET 

RUN 

SAVE 

SET 

SGN 

SIN 

SPACE$ 

SPC 

SOR . . . . 
STATUSPOINT 
STATUSVIEW 
STR$ 
STRING$ 
STOP 

SWAP 

TAB 

TAN . 
TERM 

TIME$ 


ー111 一 


・2ー155 
・2ー156 
・2ー15 7 
・2ー1568 
・2ー159 
・2ー160 
・2ー162 
・2ー166 


・2ー167/ 
・2ー1 70 
・ フ 2ー1 71 
・2ー1 /2 
・2ー]1 7 人 4 
・2ー176 
・2ー17@ 
・2ー]1 / ツ 
・2ー160 
・2ー162 
・2ー163 
・2ー165 
・2ー166 
・2ー13)5 
・2ー16/ 
・ ノ ー1668 
・2ー169 
・ ノ ー191 
・2ー192 
・ フ ノー193 
・2ー194 
・2ー195 
・2ー196 
・2ー19/ 
・2ー198 
・2ー199 
・2ー200 
・2ー20]1 
・2ー202 
・2ー203 
・2ー204 
・2ー206 


TRON/TROFF . . . .2-207 VARPTR . . . . . 2-210 
USR  .。 。 。 。 。 .。 。 .2 テ 208 WAIT VI ニク ーッ ドク 
VAL 0 。 。 。、 こ ここ ・・2-209 。 WIDTH . . . . .。 。 2 テー213 


We 


付 


A. デー タフ ァイル の 作り 方 トド ト トード トード ーーー ドー バー 付 一 ] 
B. 機械 語 プ ログ ラム の 作り 方 ・・ーーーーーーーーーーーーーーー…ー 付 一 8 
の ロー オー on 一 科 ー = 宮 rw す で 5 を 2 の 上 SG 2 2 料 こ 
D. グラ フィ ッ ク シ ン ボ ルー ドー トー トー トト トード ーー ここ 付 一 17 
E。 キャ ラク タコ ー ド ーー・・・・・・ 人 一 18 
F. ジャ ン パ スイ ッ チ と ディ ッ プ スイ ッ チ の 使い 方 ・- -・.・・ 付 一 19 
G. 演算 順位 ・・ 上 ーー 上 ーー トバ ゆ バズ ムコ ーー ドー ドド ーー 付 一 20 
HH コン トロ ー ル コー ド ・・・・・- を や た アド キャ ドキ ママ キャ ネッ リー と 
に っ 邊 に = に 2 生生 生 タニ の 付 一 91 
J、 予約 語 ・・・-・・.-・-・・・ 意思 氷 
K モモ リン の 孤 ee ・ 付 一 
L.。 〆/PD780 ニ ー モ ニッ ク ぐ 機械 語 対照 素 ・-・・・・・・・・・・・・ 付 一 37 
M。 機械 語 の サブ ルー チン 1 上 1 に に に に に に に に に に に に に ・・・・・・・・ー 付 一 45 
N. 高 人 解像度 グラ フィ ックス と モー ド ・・・・・・・・・・ーーーーー 付 一 46 
O. カラ ー コ ー ド に 対応 する 色 ( カ ラー モー ド ) と 

機能 (白黒 モー ド ) 上 「 上 tilt トド ドド に トト トト トゥ トゥ て 付 一 46 
P. 誘導 関数 ・・・・・・ ド トド トト トト トト トト トト トト トー トー と 
Q. ソフ ト 上 の 一 般 的 注意 事項 ・・・‥・・・・・・・ ド ーー 付 一 


機能 別 索 引 


1 . 一 般 的 な 命令 


一 般 コ マン ド 
AUTO 
CONT 
DELETE 
FILES/LFILES 
KEY LIST 
KILL 
LIST/LLIST 
NAME 
NEW 
RENUM 
RUN 
TRON/TROFF 


一 般 ス テー トメ ント 
DATA 
DEF FN 
DEF INT/SNG/DBL/STR 
DIM 
END 
ERASE 
FOR…TO…STEP-- NEXT 





mW ー- 


GOSUB 一 RETURN 陣 人 ーー ーーーーーーー… 2_97 


GOTO/GO TO いい 
IF…THEN ELSE/ 

IF…GOTO…ELSE 他人 …… ド ーーー 2ー101 
KFEY [Ng [N| … ド ーー トル トド ドド ドー ツー うー] 1 5 
LET 陣 IM …( ド ーー ドド ドー ドー sas 2 
ON ‥…GOSUB/ON GOTO IN IN) 時 生 の 0 の 人 村 0925 We の の 富 の に コリ OU 
RFAD 人 0 30 22 8 の 3 で の 2_ 176 
REM [中 EE 2 うー178 
RESTORE 昌 NN う _ 182 
STOP 間 全 RE 2- 200 


SWAP 全 請 | ketkkrrtw ォ ee*seeewxesne2 は 1 


ーVii 一 


2 . 入出 力 に 関す る 命令 ・ 関 数 


人 入出 力 コ マン ド 


(フロ ッ ピ イィ ディス ク ・ カ セッ ト テ ー ブ プ ) 


CLOAD 人 te うー_16 
CLOAD? [| ス そ を で ツイ イイ イキ で で パピ ドリア 
CMD BLOAD (| 間 Yeittbeeea 9 2_20 
CMD BSAVE 人 うー う 1 
CSAVE M IN ドド ドド ドド ドゥー ドゥ ーッ ーーー 2_S6 
LOAD 1 提唱 
MERGE も 
MOTOR IM [IN] ーーーーー ド トー トーーーーー う -142 
MOUNT 人 Se 
REMOVE oO 時 うー-179 


SAVEF IN で (ドロー ドド に ーー ーー スー188 


人 出力 ステ ー ト メン ト 
(フロ ッ ピ ィ イデ ィ ス ク ・ カ セッ ト テ ー ブ グ ) 





CLOSE [ 陣 人 …… ド ドー ドー2ー18 
DSKO$ [el] 則 IN 上 ee ee 2_ 7S 
FIELD 本 1 や や teetrtwvrheezr 衝 ns 
GET 利和 
INPUT せ 了 7htYKWNN eee 2 109 
LINE INPUT か 2 125 
LSET/RSET 人 
OPEN 半生 | khNKNK を Re weeees2k 
PRINT IN IN| ーー ドー ドー バーー バ ーーー トー ブー162 


ーv 抽 一 


PRINT 填 USING IN の の の 本 の フー170 


PUT 癌 I 店 333 信和 に 6 の 7 
SFT [gl 陣 則 …… ド ーー 2 潜 の e、 フー1689 


(画面 ・ キ ー ボ ー ド ・ プ リン タ ) 


CMD COPY NMl ドド ドド ドド ドド ドゥ ーー リー フー29 
INPUT IN [IN| ドー バ ーーー ドド ーー ああ 5 人 うー107 
PRINT USING/ 
LPRINT USING 人 ーー ーーーーーーー ・ 2167 
(スピ ー カ ) 


(RS-232C ポ ー ト ) 





INIT MINI ーーー 半生 志 守 22 の 
INPUT IN [IN| ドー ドー バー ババ バー ドー ドー フー112 
PRINT め [Na [N) 計時 ま SI 8 な な の の た うー166 
入出 力 関数 
(フロ ッ ピ イィ ディ スク ) 
ATTRS$ 院 還 | 敵 | mwwefe hskzhwkwsd か wao 導 
(1) DSKF 計 | 陳 ftthtePbteh を Se 笑っ 
(2) DSKF [| 隊 ド ド ドー ドー 誠に うー71 
DSKI$ [s| 骨 人 ee うー72 
EOF [sl 骨 人 3 201 の 78 
Xe 


FPOS [| 岬 ……… 0 ーー 


INPUTS 陽二 うー-110 
LOC [sl 陽 全 …………… の う - 129 
LOF いい ee 生計 に e 2 うー-132 


(キー ボー ド ・ プ リン タ ) 


INPUT$ IN IN 1 ie まま の LU 
LPOS IN [IN] ・… ド ーー 間隔 イド 


(RS-232C ポ ー ト ) 


INPUT$ | SSCKACCEC YY で で ャ で すす 2_ 110) 
PORT MIN 1 ドー ドド ドー ドド ーー 2 一 157 


3 . 画面 制御 に 関す る 命 3 


ビリ / 
4 
藻 


画面 制御 ステ ー ト メン ト 


CMD CLS 
CMD COLOR@ 
CMD SCREEN 
CMD VIEW 
COLOR 
CONSOLE 
LOCATE 

_ WIDTH 


- 画 面 制 御 関数 
POS 


画面 制御 予約 変数 
CSRLIN 


CR まっ 1 を た ク 。24 
生生 2-25 
人 2-47 
時 2_49 
の 2-51 
人 訴 NN 2_53 
信和 se 2-130 
記 RG うう 1 3 
[NM IN ドド ーー トー ドド ドド ドー ドー 2-158 


人 信和 5 


ーー 


4 グラ フィ ックス に 関す る 命令 ・ 関 数 


グラ フィ ックス テー トメ ント 
( 高 解像度 グラ フィ ックス ) 


CMD CIRCLE 人 に うう 2 
CMDCOLOR 。 人 ……… 本 革 当 本 2-25 
CMD GET @ きす マネ で ドサ ペ サマ マイ ドド マセ トド イリア ゴ トー うき 1 
EMD EINE 。。 0 。)。)。 7 2ー35 
CMDPAINTll)-000 ち まち ね うー37 
CMD POINT 了 和 0 6 浅 9 83828 お る フー39 
CMD PRESET まで セキ が オド で で ウサ で で ヤギ キ ドッ すさ 2_40 
CEMED PSE や WI 2_4 1 
CMD PUT @ の 2_43 
( 低 解像度 グラ フィ ックス ) 
GET @G [NN [N] ドド ゆー ドー ヨ ニーー ーーー 2 う _94 
LINE NISS VON うう 12 う 
PRESET Ngl [N] et ポー トド トード ドド ーー うー-159 
PSFET INI ………… SE の 5 りう = 171 
PUT G の 8 


ク グラフィック 関数 
( 高 解像度 グラ フィ ックス ) 


STATUSPOINT 0 [Niー ド ド ド ド ドド トゥ に に レレ に ゥ に レレ に に に に に に ピピ 2_196 
STATUSVIEW 0 湖 0 演 0 守 :0 1 2 9828 0 うー197 
( 低 解像度 グラ フィ ックス ) 


POINT 0 IINMI 9006RRey2 eee 2ー1SS 


ーX11 一 


5 . 算術 演算 に 関す る 関数 


数 値 関数 
ABS 
AIN 
CDBL 
CINT 
COS 
CSNG 
CVI/CVS/CVD 
上 XP 
FIX 
INT 
LOG 
RND 
SGN 
SIN 
SOR 
TAN 


IN 1 ドド ド ーー トー トト トス ーー の 
| 
| 4 wrtmwwNKeyeea3 うー1 1 
販 2 
人 う _S5 
IN ドー ニー トー ドー トト トト トト ーー トー う 257 
IDTIIU EE っ _ so 
[NI に ーー トト トト トト トッ ーー 2_83 
INI …ー ド ドド ドド ドド ドド ーー う _88 
INI 上 ーー ドド ドド に ピー ピー 2-114 
IN ドー ドド ドー ドド トト トット ここ うー133 
IN バー トト ドド ーー ドド ドド ーーー う _ 186 
[NI バド ドー トー トド トド ドー ドド < に ッッ ーー うー191 
凍 tthkthe2ktwhks キ を em 2 192 
本 2 う _195 
時 9 入 2 98 う _-203 
ーX111 一 


6 . 文字 列 操作 に 関す る 命令 ・ 関 数 


文字 ステ ー ト メン ト 


1) MID$ 


文字 関数 
ASC 
CHR$ 
HEX$ 
INKEY$ 
INSTR 
LEFT$ 
LEN 
(2) MID$ 
MKI$/MKS$/MKD$ 
OCT$ 
RIGHT$ 
SPACE$ 
| SPC 
STR$ 
STRING$ 
TAB 
VAL 


文字 予約 変数 
DATE$ 
| TIMES 


My ネ kr 人 YWPMwWNK の 137 
[N| ・ に ドド ババ トー トト トト トト トト ッッ ーーーー う _6 
の た ドド マッ うー12 
eee う _100 
IN| ーー トト トト トット ッ ーー・ 2-10S 
信和 E2S0Wea99 o うー 1 1 3 
人 う _119 
5 うー-120 
の らい う -138 
"III っ _ 139 
IN ・ に ヘー トト トス ・・ で ここ ーー・ 2_147 
IN … ド ーーー ドー ドド トド トト ーー 2_18S 
INI ドド トト ドド トト トト トッ ッッ ーー う _193 
MY PWMK ま を す ) うー-194 
1 1 も スマ ペ テイ ア ャ マー で フナ う _-198 
[N] ドー トー トト トー トー うー199 
Ri う _202 
人 う -209 
1 0 キネ ます 2_62 
2 況 2206 


ーーX1V 一 


7 . 特殊 な 命令 や 関数 


特殊 コマ ンド 
CMD INIT 
FORMAT 
MON 
| TERM 


特殊 ステ ー ト メン ト 
CLEAR 
DEFUSR 
ERROR 
ON ERROR GOTO 
| OUT 
POKE 
RESUME 
WAIT 


特殊 関数 
FRE 
INP 
PEEK 
USR 
VARPTR 


特殊 予約 変数 
ERL/ERR 


層 | 拉 人 khhw wwYwwtttwe キ 5 2-33 
所 2-91 
NM IN] ドド ーー ドド ーー ドド ドー トド ドー ドー トー 2ー-141 
導 | 1 ertyewhnwtweW*s を fw 2-204 
[NM [IN| ‥ 人 ee 吉 eee 2-14 
[INI ドー ドド ーー バー トー スー66 
1 | の の 2_81 
1 ・2-148 
開 2 2ー1 53 
玉生 ーー 2 一 156 
凍 人 ke ーー フー183 
導入 2 2ー212 
時 | 、] まそ さて で テト ミャオ で で サド ミド ミト 2_93 
導き 2-106 
NN ーー ドド ドー トド トト ドド トド ・ ト トッ トト ここ 2 一 154 
間 | 国 wttwtwwzkPewfwel 2_208 
| | kw YY Mo2 KK キキ ォ 2--210 
| 中 証 1 末 で 2_ 80 


ーXYー/ 一 xVi 一 


W 








Nso-BASIC 概 妥 





1.1 Nso-BASIC と N-BASIC 


PC-8001MKII (以下 MKII と 呼び ます ) は , Nso-BASIC と N-BASIC と い 
う 2 つの モー ド を 持っ て お り , 必要 に 応じ て 切り 替え て 使用 し ます 。 

N-BASIC は 姉妹 機 の PC-8001 に 搭載 され て いる も の と 全く 同じ で , 現 
在 数 多く 流通 し て いる PC-8001 用 の ソフ トウ ェ ア を 利用 し て 頂く た め に 用 
音 さ れ て いま す 。 た だ し , この モー ド で は MKI が 持っ て いる 多く の 
重宝 な ハー ドウ ェ ア ( 高 解像度 グラ フィ ックス な ど ) を 完全 に サボ ポート する 
この で きま や ん 。 

Ns-BASIC は 。N-BASIC に MKII が 持つ ハー ドウ ェ ア の すべ て を 活用 
する た め に , 御 要望 の 多かっ た 高 解像度 グラ フィ ックス の 機能 な どい くつ 
か の 拡張 命令 が 付加 され た も の で MKIH の メイ ンプ ログ ラミ ング 言語 で す 。 

この 2 つの BASIC は 完全 な コン パチ ビリ ティ を 持っ て いて N-DAS1C 
で 動く プロ グラ ム な ら ば Nso-BASIC 上 で も 変更 な し に 動き ます 。 た だ し , 
プロ グラ ム の 容量 が 大 きい と き ,。 また は 割り 込み の 優先 順位 が 典 な る た め 
鐘 種 イン タフ ェ ー ス ボー ド を 使用 し た 場合 な ど は 変更 が 生じ る 場合 が あり 
ます 


1.2 Nso-BASIC の 主 な 特徴 


Ns -BASIC は 新しい 機能 と し て 次 の よう な 特徴 を 持っ て いま す 。 
1. MKI が 持っ て いる ハー ドウ ェ ア の 機能 の は と ん と を Nso -BASIC 
で 使用 する こと が で きま す 。 
絹 作 可能 な 機器 を 以下 に 示し ます 。 
0 ログ クマ クン クルック テン シンク ショ ンー 
O 〇 オー ディ オカ セッ ト テ チー ブレ コー ダ 
O RS 一 232C イ ンタ フェ ー ス 機器 
の ラグ 四 以 E イ デイスク 
O8 イ ンチ ・ フ ロッ ピ イ ディ スク 
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O セ ント ロニ クス ・ イ ンタ フェ ー ス 機器 (プリ ンタ ) 

2.。 16K バ イト の グラ フィ ッ ク 専 用 RAM を 持っ て いる た め , 320X 
200 ビ クセ ル (4 色 カラ ー モ ー ド ), 640X200 ピ クセ ル ( モ ノ ク ロ モー 
ド , アト リ ビ ュ ー ト カラ ー モ ー ド ) の 高 解像度 グラ フィ ックス を 実 
現 で きま す 。 

3. リス ト な ご ど ご キャラ クタ を 表示 する た め の テ キス ト RAM と , グラ 
フィ ッ ク RAM は 完全 に 区 別 さ れ て いる た め , テキ スト 画面 と グラ 
フィ ッ ク 画 面 の 合成 が 簡単 に で きま す 。 | 

4.。 オフ ショ ン の 漢字 ROM ボー ド を 接続 すれ ば , 日 本 語 の 文章 を 処 
理 す る こと が で きま す 。 


1.3 動作 モー ド 


MKI の 電源 を 入れ BASIC を 起動 する と 画面 に メッ セー ジ が 表示 され そ 
の あと “Ok" と いう 文字 が 表示 され ます 。 

この “Ok" が 表示 され て いる 状態 を 「BASIC が コマ ンド レベ ル に ある 。」 
こい いま す 。BASIC が コマ ンド レベ ル に ある と き は , その BASIC の あら 
ゆる コマ ンド を キー ボー ド か ら 入 力 す る こと が で きま す 。BASIC の コマ ン 
ド は , ダイ レク トモ ー ド , プロ グラ ム モ ー ド の いずれ か で 使用 する こと が 
で きま すみ 。 


1.3.1 ダイ レク トモ ー ド 

行 番号 を つけ ず に BASIC の 文法 に 沿っ た 文 を キー ボー ド か ら 人 入力 し . 
IRETURN| キー を 押す と その 文 は すぐ に 実行 され ます 。 こ れ を ダイ レク ト 
モー ド の 実行 と いい ます 。 入力 され た 文 は メモ リ に 残り ませ ん 。 





1.3.2 ブ プログ ラム モ ー ド 
行 番号 ( 0 一 65529 ま で の 整数 ) を つけ て 文 を 入力 し た 場合 
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キー を 押し て も , すぐ に は 実行 され ず メ モリ の 中 に ブ プログ ラム と し て 行 番 
号 順に 格納 され ます 。 こ の 格納 され た ブロ グラ ム は , RUN コマ ンド , GO 
TO ステー トメ ント , GOSUB ステ ー ト メン ト に より 実行 させ る こと が で き 
ます 。 こ れ を プロ グラ ム モ ー ド の 実行 と いい ます 。 な お , 1 つの 行 を 人 入力 
後 IRETURN| キー を 押し た 場合 "Ok" の 表示 は され ませ ん が , BASIC は コ 
マン ドレ ベル に あり ます 。 


| 

MKI に TERM コマ ンド を 入力 する と , 他 の コン ビュ ー タ , ある い は 周 
辺 装置 の 端末 と し て 使用 する こと が で きま す 。 こ の 状態 を ター ミナ ル モ ー 
ド と いい ます 。 


1.4 文 


文 と は , BASIC が 行う 手続 き を 記述 し て いる 最小 単位 で す 。 

文 に は , BASIC が 実行 する 式 , ステ ー ト メン ト , コマ ンド , 関数 な ど を 
書く こと が で きま す 。 ま た 文 は 。 コロ ン ( : ) を 用 いて 他 の 文 を つなぐ こと 
が で きま す 。 こ れ は 複 文 (マル チ ス テー トメ ント ) と 呼ば れ , 複 文 は , 1 行 ( 行 


番号 も 含め て )255 文 字 以 内 の 長 さ まで 許さ れ て いま す 。 


1.5 行 番 号 


BASIC の 各 プ ログ ラム 行 は , 行 番号 で 始ま ら な けれ ば な り ま せん 。 行 番 
号 に は , 0 一 65529 ま で の 整数 を 用 いま す 。 行 番号 は プロ グラ ム 行 を メモ リ 
に 格納 する 順序 を 示し , 実行 も 行 番号 の 若い 方 か ら 行 われ ます 。 ま た 分 岐 
や 編集 の 目印 と し て も 使用 され ます 。 | 

行 番号 の 代わ り に ピリ オド (.) を 使う こと が で きる 場合 が あり ます 。 ビ ヒ 
リオ ド は LIST , AUTO , DELETE な ど コ マン ド 中 で , エラ ー 発 生 , 編集 
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な ご に よっ て BASIC 内 の ボイン タ が 示し て いる 現在 の 行 を 表す も の で す 。 
( 例 ) LIST. 

AUTO、. 

DELETE .-100 


1.6 使用 で きる 文字 と コン トロ ー ル キャ ラク タ 


N so(N)-BASIC の 使用 で きる 文字 は , 英文 字 . カナ , 数 字 , 特殊 記号 
そし て グラ フィ ッ ク キ ャ ラク タ よ り 構 成 さ れ て お り , これ ら は キャ ラク タ 
セッ ト こ と 呼ば れ ま す 。 英 文字 は 大 文字 と 小文字 で , 数 字 は 0 から 9 まで で 
す 。 これ ら キ ャ ラク タ セ ッ ト の 詳細 は , 付録 K の "キャ ラク タコ ー ド "を 参 
中 し て くだ さい 。 他 に も 特別 の 意味 を も つ コ ント ロー ルキ ャ ラク タ が あり 
ます 。 こ れ に つい て は , 付録 H の "コン トロ ー ル コー ド " を 参照 し て くだ さ 
し) 。 


1.7 特殊 記号 の 使い 方 


BASIC で は , 演算 子 ( 十 , 一 , ※, ) な どの 他 に も 特別 な 意味 を 持つ 記 
号 が あり ます 。 こ こ で その 意味 を まとめ て 説明 し て お きま す 。 
1. ピリ オド ()) 
究 住 BASIC が 着目 し て いる 行 番号 の 値 を 持っ て お り ポ イン タ と し 
て 使用 する こと が で きま す 。BASIC が 着目 し て いる と は 。 新しい 行 を 
挿入 し た , エラ ー が 発生 し た な どの 行 で す 。 
( 例 ) LIST. 
2.。 ハイ フン (一 
LIST , DELETE な ご で 行 の 範囲 を 指定 する 時 , 何 行か ら 何 行 まで 
と いう 場合 に 使い ます 。 


( 例 ) DELETE 100 -200 
3 コロ ン (:) 
マル チ ス テー トメ ント の 区 切り と し て 使い ます 。 
( 例 ) AB 十 C : PRINT A 
4. コン マ ()) 
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PRINT , INPUT な ど パ ラメ ー タ が 並ぶ 場合 その 区 切り と し て 使い 
ます 。 
( 例 ) INPUT A, B, C 
COLOR 7..0 
や 
PRINT な どの 区 切り と し て 使い ます 。 
( 例 ) PRINT “A ニ ”: A 
6. アポ スト ロフ ィ (の) 
REM( リ マー ク ) の 代用 と し て 使え ます 。 
/。 呈す チヨ ンマ ー ン (7) 
PRINT の 代用 と し て 使え ます 。 





N so -BASIC の 定数 に は 以下 の も の が あり ます 。 


10 進 形式 


文字 定数 
定数 - 整数 弄 8 進 形式 
16 進 形式 





倍 精 度 型 


1.8.2 文字 定 問 
文字 定数 と は , 255 文 字 以 下 の ダ ブル クォーテーション マー ク (”) で 囲 
まれ た 英 数 字 。 カナ 文字 , 記号 な どの 列 の こと で す 。 ま た , 何 も な い 文 字 





列 の こと を ヌル スト リン グ と いい ます 。 な お , (”) を 文字 列 の 中 に 記述 す 
る 場合 は , CHR$ 関数 を 用 いな けれ ば な り ま せん 。 
例 ) “Good Morning 
-123456789" 
- パー ソナ ルコ ンピュータ ” 
(ヌル スト リン グ ) 


1.8.3 数 値 定数 


数 値 定 数 は , 整数 型 , 実数 型 に 分 けら れ , それ ら は 正 あ る い は 負 の 数 . 
0 で きす 。 





負 の 数 の 前 に は 必ず マイ ナス 符号 を つけ な けれ ば な り ま せん が , 正 の 数 
の 前 の ブラ ス 符 号 は 省略 する こと が で きま す 。 


1.6.4 整 懇 


(1) 10 進 形式 





弄 


ー32768 一 十 32767 ま で の すべ て の 整数 , また は , 数 の 後に 多 を つ 
けた も の 。 小数 点 を つけ る こと は で きま せん 。 
例 ) 32767 
ー123 
32767% 一 整数 を 表す 。 
(2) 8 進 形式 
頭 に &O また は & を 伴っ た . 
&177777 の 範囲 
例 ) &12345 
&O7777 
(3③) 16 進 形式 


0 か ら 7 ま で の 数 字 の 並び 。&0 一 
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頭 に &H を 伴っ た , 0 か ら F ま で の 並び 。 
例 ) &H100 
&HFFFF 
注意 )8 進 形式 また は 16 進 形式 で 入力 され た 数 値 は , PRINT , 
LPRINT で は 10 進 形式 で 出力 され ます 。 





1.8.5 実数 弄 
実数 型 は 単 精度 型 と 倍 精度 型 に 分 けら れ ま す 。 


1.8.6 単 精度 型 
有効 桁 7 桁 の 精度 で 格納 され ます 。 出 力 の と き は 7 桁 目 が 四 捨 五 人 され , 
6 桁 以下 で 表示 され ます 。 扱え る 数 値 は , 一 1.7014E 十 38 一 1.70141E 十 38 


1) 7 桁 以下 の 実数 
(2) E( 大 文字 に 限る ) を 使っ た 指数 形式 
(3) 最後 に ! を 伴っ た 数 


例 ) 123 
ー7.09E-06 
3525.68 
3.14! 


1.8.7 倍 精 度 型 
有効 桁 16 桁 の 精度 で 格納 され , 16 桁 以下 で 表示 され ます 。 
(1) 8 桁 以 上 の 数 
(2) D( 大 文字 に 限る ) を 使っ た 指数 形式 
(3) 最後 に 半 を 伴っ た 数 
例 ) 1234567890 
ー1.09432Dー06 十 0.3141592653D 十 01 
56789.0 症 
G657036.1543976 


1.9 変 数 


1.9.1 変数 と は ? 

BASIC の フロ グラ ム 中 で 使わ れる 値 を 格納 する た め の エ リア に , 英 数 
子 か ら 成 る 名 前 を 対応 させ た も の が 変数 で す 。 

急 数 の 値 は 。 プログ ラマ に よっ て 定義 され , 演算 , 参照 な ど に 使う 
了 才 誠 人 人 和 
値 が 割り 当て られ る まえ に 参照 され た ら 0 が 代入 され , 文字 変形 は ヌル ス 
トリ ング ( 空 の 文字 列 ) が 代入 され ます 。 


1.9.2 変数 名 と 型 宣言 文字 

Nso (N)-BASIC に お いて ., 変数 名 は 何 文 字 あ っ て も か まい ませ ん 。 
た だ し Nso (N)-BASIC で は 最初 の 2 文字 まで の 判別 し か し ませ ん 。 ま た 
最 切 の 文字 は 英字 で な けれ ば な り ま せん が , 残り の 文字 は 英文 字 ま た は 数 
子 の どれ で も か まい ませ ん 。 た だ し 変数 名 は 付録 ] に 示す 予約 語 を 含ん 
で は いけ ませ ん 。 

同じ 変数 名 で も 型 が 違え ば 区 別 さ れ ま す 。 変数 の 型 は 型 宣言 文字 に よっ 
て 決ま り , 型 宣言 文字 は 変数 名 の 最後 に つけ て , その 変数 の 型 を 表わし ま 
す 。 尋 宣 言 文字 を 省略 する と , “1 "が つい て いる と みな され ます ( 単 精度 
実数 型 変数 と な る )。 
2 整数 型 


弄り 吉 語 立 字 】 
スチ ] 。 価 精 度 実 雪 型 
$ 文字 名 
具 
A 半 
A (これ ら は 区 別 き れる が , A と A ! は 同じ 。 
A$ 


外 数 の 型 を 宣言 する の に も う 1 つ 便 利 な 方 法 が あり ます 。 それ は DE- 
FINT , DEFSNG , DEFDBL , DEFSTR の 型 宣言 文 を プロ グラ ム 中 で 用 
いる 訪 法 で す 。 こ れ に つい て は 2 童 で 詳し く 説 明 し ます 。 
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1.9.3 配列 変数 
配列 変数 は , 1 つの 変数 名 で いく つか の 要素 を 参照 する こと の で きる 変 
数 で す 。 配 列 変数 の それ ぞ れ の 要素 は , 整数 また は 整数 表記 に よる 添字 に 
よっ て 参照 され ます 。 
配列 変数 の 次 元 は 255 次 元 ま で , 添字 は メモ リ の 範囲 内 で 許さ れ て お り , 
これ ら の 大 き さ は DIM ( 2 章 参 照 ) で 宣言 し ます 。 た だ し , 各 添 字 は 原則 
と し て 0 か ら 始 まり ます か ら , 実際 の 要素 数 は 添字 の 数 十 1 と な り ま す 。 
例 ) DIM A(10) 1 次 元 配列 , 要素 の 数 三 11 
DIM TA(10, 50) 2 次 元 配 列 。 要素 の 数 11X51 テ 561 
DIM NA$(2, 5, 3) 3 次 元 配列 要素 の 数 3 X6X4 ニ 72 
各 添字 の 数 が 10 以 下 の 時 は DIM 文 に よる 宣言 を 省略 する こと 
が で きま す 。 


1.9.4 予約 変数 
Nao(N ) 一 BASIC に は , BASIC 自身 が 専用 に 使う 予約 変数 が あり ます 。 
これ ら の 変数 は , ユ ー ザ に よっ て 一 般 の 変数 と し て 使う こと は で きま せん 。 
TIME$ 現在 の 時 分 秒 を HH : MM : SS の 形 で も っ て いま す 。 
同じ 形 で 代入 する こと も で きま す 。 
DATE$ 現在 の 年 月 日 を YY/MM/DD の 形 を も っ て いま す 。 同 
じ 形 で 代入 する こと も で きま す 。 
ERL エラ ー の 生じ た 時 , エラ ー が 発生 し た 行 番号 を も っ て 
いま す 。 代入 する こと は で きま せん 。 
ERR エラ ー が 発生 し た 時 , 生じ た エラ ー の エラ ー コ ー ド を 
も っ て いま す 。 代入 する こと は で きま せん 。 


1.10 型 変換 


N s0 (N)-BASIC の 数 値 デ ー タ は , 必要 に 応じ て その 形 か ら 他 の 形 に 変 


換 す る こと が で きま す 。 た だ し , 文字 型 と 数 値 型 の 間 で この 変換 を 行う こ 
と が で きま せん 。 
(1) ある 型 の 数 値 デ ー タ が , 違っ た 型 の 数 値 変数 に 代入 され た 場合 , 
数 値 は , その 変数 名 に よっ て 宣言 され た 型 に 変換 され ます 。 
例 ) 10 AB% 三 1.234 
20 PRINT AB% 
RUN 
1 
2) 精度 の 違う 数 値 問 の 演算 の 場合 , 精度 の 高い 方 に 変換 され て , 演算 
が 行わ れ ま す 。 た と えば , 10 音 /3 の 場合 は , 10 韻 /3 井 と し て 演算 が 
行わ れ ま す 。 
例 ) 10 A せ 三 10 斗 /3 
20 B 半 三 10 半 /3 半 
30 PRINT A 壮 , B 半 
RUN 
3.333333333333333 3.333333333333333 
3) 語 理 演算 の 場合 , 扱わ れる 数 値 は すべ て 整数 に 変換 され 結果 は 束 
数 で 与え られ ます 。 
例 ) 10 A 半 12.34 
20 B=NOT A 盾 
30 PRINT B, A 壮 
RUN 
ー13 12.34000015258789 
(4) 実数 が 整数 に 変換 され る 場合 は , 小数 点 以 下 は 切り 捨て ます 。 
この 時 , 整数 型 で 扱え る 範囲 を 越え た 場合 は エラ ー が 起こ り ま す 。 
例 ) 10 A%=34.4 10 A サ ーー1.234E 十 07 
20 B%=34.5 20 B=A 半 
30 PRINT AB 30 PRINT B め , A 
RUN RUN 
34 34 Overflow in 20 
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(5) 倍 精 度 変 数 が 単 精度 変数 に 代入 され た 時 は 。 変数 の 値 は 有効 数 字 7 
桁 に 丸め た も の と な り ま す 。 単 精度 変数 の 精度 は 7 桁 で あり , も と の 
倍 精度 の 数 値 と の 誤差 の 絶対 値 は , 6.3E 一 8 以下 と な り ま す 。 

例 ) 10 A 半 123456789+ 
20B! 一 A 半 
30 PRINT A 壮 ,B! 
RUN 
1.23456789 1.23457 


1.11 式 と 演 邊 


式 と は 定数 や 変数 を 演算 子 で 結合 し た 一 般 的 な 数 式 や , 単に 文字 や 数 値 , 
ある い は 変数 だ け の も の を いい ます 。 
例 ) “BASIC" 
3.14 
10 十 3/5 
A 十 B/C-D 
TAN( DO ) 


BASIC の 演算 は 次 の 5 つ に 分 類 さ れ ま す 。 


1. 算術 演算 
関係 演算 
論理 演算 
関数 
文字 列 演算 


人 マ 


1.11.1 算術 演算 

算術 演算 子 に は 次 の よう な も の が あり ます 。 

実 | 演算 子 演 鼻 例 

「ー 指数 演算 し 6 

| 一 負 号 ーX 

*, / 乗算 , 実数 の 除算 X* ネ Y.XY 
+, 一 加算 , 減算 し で は 6 1 
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賃 算 の 実行 順序 を 変更 する 場合 カッ コ を 使用 し ます 。 カ ッ コ 中 の 演算 子 
は 他 の 演算 子 よ り も 先 に 実行 され ます 。 カ ッ コ 内 に お いて は 通常 の 実行 順 
序 に 従っ て いま す 。 

炊 に 実行 例 を 示し ます 。 

代数 表記 BASIC の 表記 
1) 2X 十 Y 2 来 又 十 Y 

X 
2) デオ 2 メグ Y 十 2 


ーー 、 太 士 Y 
3 ) ー ゥ ヶ ー ( X キ ング 2 


4) X 十 2X 十 1 X へ 2 十 2※X 十 1 
9 X へ (Y^ へ 2 
) (X')* る 人 
7) Y( 一 名 Y* ネ (一 多 ) 


C 〇 ぶ 〇 1 


(1 ) 整数 の 除算 と 剰余 の 計算 
整数 の 除算 は \ に よっ て 行わ れ ま す 。 扱わ れる 数 値 が 実数 の 場合 は , 
賃 算 が 実行 され る 前 に 小数 点 以 下 が 切 り 捨 て られ ます 。 商 も 小数 点 以 
下 が 切 り 捨 て られ た 整数 と な り ま す 。 
例 ) 10\3=3 ( 10/73=3…1 
23.75\5=4 ( 23/5 ニ 4…3) 
剰余 の 計算 は MOD に よっ て 行わ れ ま す 。 扱 われ る 数 値 が 実数 の 場 
合 は , 演算 が 実行 され る 前 に 小数 点 以 下 が 切 り 捨て られ ます 。 結果 は 
整数 の 割り 算 の 余り で す 。 
例 ) 13.3 MOD 4=1 ( 13/4 三 3…1 
25.68 MOD 6.99=5 (25/6= ニ 4…1) 





(2) 0 で の 除算 
式 の 実行 時 に 0 で の 除算 が 行わ れ た 場合 は , エラ ー メ ッ セ ー ジ を 出 
カカ し ,。 コマ ンド レベ ル に 戻り ます 。 
また だ た, べき乗 の 実行 時 に , 0 に 対し て 負 の べき 乗 を 行っ た 場合 も 同 
様 に な り ま す 。 [ 
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例 ) PRINT 2/0 
Division by Zero 
PRINT 0“^ 一 1 
Division Dy Zero 
( 3 ) 桁 あ ふれ (オー バー フロ ー) 
代入 や 演算 の 結果 が その 変数 の 型 内 で 表現 する こと の で きる 範囲 を 
こえ た 場合 , 桁 あ ふれ が 発生 し ます 。 
桁 あ ふれ が 起こ っ た 場合 , BASIC は "Overflowv" エラ ー を 出力 し ます 
例 ) PRINT 300^300 


Overflow 


1.11.2 関係 演算 

関係 演算 子 は 2 つの 数 値 を 比較 する と き に 用 いま す 。 結果 は , 真 (一 1 ), 
偽 ( 0 ) で 得 ら れ , 冬 件 判定 文 な ど フ ログ ラム の 流れ を 変え る の に 用 いら れ 
ます ( IE 文 参 照 )。 


隔て 内 容 例 

一 し ニーY 

く 2。 2 く 等 し く な い ※《 ぐ WW 

4 小さ い XX く Y 

> 大 きい XXA>Y 

< く 三 . 三 < 小さ いか 等 し い < テニ Y, 欠 三 <Y 
>ー, > 大 きい か 等 し い > ニモ Y, ーッ >Y 


ー は 代入 文 に も 使う の で 注意 する こと 。 
IF 文 の 中 で の 使い 方 の 例 を 次 に 示し ます 。 


IF X ニ 0 THEN 1000 
IF A 十 B く >0 THEN X=X 十 1:Y=Y 十 1 


1.11.3 論理 演算 
論理 演算 子 は 複数 の 条件 を 調べ た り , ビッ ト 操 作 や ブー ル 演 算 を 行っ た 
りす る の に 用 いま す 。 論理 演算 は ,. ビッ ト ご と に 0 また は 1 を 結果 と し て 
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与え ます 。 各 論理 演算 の 内 容 を 次 に 示し ます 。 ` 
NOT ニ not ( 否定 ) 





OR=inclusive or (論理 和 ) 


1 
1 
0 


0 


XOR 三 exclusive or (排他 的 論理 和 ) 


入 


つ ビビ 


INP= テ implication ( 包 


か XX 


〇 つ ーー 


EQV 三 equivalence (同値 ) 


4 


y 
] 
0 
ト 
0 


1 
U 
1 
() 


着 


人 ム 、 
F コ 


| 


NOT 欠 % 


AAND Y 


AORY 


〇 つ ビビ 


AXOR Y 


つの ビビ 


AIMPY 
2 


- 


XPEQV Y 


論理 演算 も 関係 演算 子 の よう に , プロ グラ ム の 流れ を 変え る の に 用 いら 
れ ま す 。 こ の 場合 。 論理 演算 子 は 2 つ 以 上 の 関係 演算 子 と 結ぶ こと が で き 
ます 。 


例 ) (1) IF X<0 OR 99>X THEN 1000 
(2) IF 0<X AND X<100 THEN X= テ 0 
(3) IF NOT (A=0) THEN 20 


(1)X が 負 ま た は , 99 よ り 大 きけ れ ば , 行 番号 1000 へ 飛ぶ 。 
(2)X が 正 で か つ , 100 よ り 小 さけ れ ば , X に 0 を 代入 する 。 
(3A が 0 で な けれ は ば, 行 番号 20 へ 飛ぶ 。 
論理 演算 子 は 演算 の 前 に 扱う 数 値 を 一 32768 一 十 32768 ま で 
の 値 を と る 2 の 補 数 表示 の 整数 に 変換 し ます 。 も し , この 範 
囲 外 と な れ ば “Overfiow" エラ ー と な り ま す 。 もし, 0O( 偽 ) と 
ー 1 ( 真 ) し か 与え られ な か っ た な ら , 論理 演算 子 は 0 と 一 1 
し か 結果 と し て 与え ませ ん 。 指定 され た 論理 演算 で は , この 
整数 に 対し ビッ ト ご と に 演算 を 行い ます 。 し た が っ て , 論理 
演算 子 は バイ ト デ ー タ を ある ビッ ト パ タ ー ン に 照ら し 合わ せ 
て 調べ る こと が で きま す 。 た と えば AND 演算 子 は 機 答 の I/ 
O ポ ボート の ステ ー タ スバ イト の 必要 な ビッ ト 以 外 の すべ て の 
ビッ ト を マス ク す る こと に 使え ます 。 ま た OR 演算 子 は ある 
2 進数 を 作る た め に 2 つの ビッ ト パ タ ー ン を 混在 させ る こと 





が で きま す 。 
本 拉 ま 導 ま と 記 も 
すず 
例 ) 63 AND 8 テ 8 63 三 (111111)。, 8 三 ( 001000)。 
し た が っ て , 63 AND 8 ニ ( 001000)。 三 8 
ー1 AND 8=8 ー1 三 ( 1111111111111111)。, 8 三 ( 001000)2 


し た が っ て , 一 1 AND 8 テ 6 
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12 OR 11 テ 15 12 三 ( 1100)。, 11 三 ( 1011)。 

し た が っ て , 12 OR 11=( 1111)。 三 15 
32767 OR 一 32768 ニ テー1 

32767 三 ( 0111111111111111)。 
ー32768 ニ テー( 1000000000000000)2 

し た が っ て , 32767 OR 一 32768= 

( 1111111111111111)。 ニ ー1 
12 XOR 11 ニ 7 12 三 ( 1100)。,。 11 三 ( 1011)。 

し た が っ て , 12 XOR 11 三 ( 0111)。 ニ 7 
10 XOR 10 テ 0 10 三 ( 1010)。 

し た が っ て , 10 XOR 10=( 0000)。=0 
NOT X メ ニー( X 十 1) 任意 の 数 の 補 数 表示 は 1 の 補 数 に 1 を 加え 

だ も の で ある 。 


1.11.4 関 数 

関数 と は 与え られ た ある 引き 数 に 対し て , ある 決っ た 演算 を 行う も の で , 
値 と し て は , この 演算 の 結果 を 返し ます 。 

BASIC は "組み 込み 関数 "と し て SIN ( 正 蓄 ), SQR (平方 根 ) な どの 数 値 関 
X や CHR $, LEFT$ な どの 文字 関数 を 本 体内 に も っ て いま す 。 

また , BASIC は "ユーザ 定義 関数 "と し て ユー ザ が 自由 に 定義 で きる 
数 機能 を も っ て いま す 。 こ れ は 2 章 の "DEFFN” の 項 で 説明 し ます 。 

一 般 に 引き 数 に 整数 し か と ら な いも の は , 小数 部 分 を 切り 捨て て か ら 演 
算 を 行い ます 。 

次 に 関数 の 使い 方 の 例 を 示し ます 。 








例 ) A 三 SIN (3.14)+COS (3.14) 
PRINT2, 2*2.SOR (2) 


1.12 文字 列 の 演算 


1.12.1 文字 列 の 連結 
文字 列 は 演算 子 二 に よっ て 連結 する こと が で きま す 。 


例 ) 10 A や ="NEC" : BS$ 三 "PC-” | C⑤ 三 "8001MK2" 
20 D$ーA$ 十 “"。” 土 B$ 十 CS$ 
30 PRINT DS 
RUN 
NEC PC-8001MK2 


1.12.2 文字 列 の 比較 
文字 も 数 値 の 比較 に 用 いら れる も の と 全く 同じ 関係 演算 子 を 用 いて 比較 
する こと が で きま す 。 
ー、 <。 う 。 くう >。 > < <〈 三 。 三 く 。 > テ , ッ 

文字 列 の 場合 それ ぞ れ の 文字 列 の 最初 か ら 1 文字 ずつ , 文字 の 比較 を 行 
いま す 。 も し 相互 に 全く 同じ 文字 列 の 場合 は , その 2 つの 文字 列 は 等 し く 
な り ま す が 。 1 箇所 で も 違っ た 場合 は , その 文字 の キャ ラク タコ ー ド 
(付録 の キャ ラク タ 参 照 ) の 大 きい 方 の 文字 列 が 大 きく な り ま す 。 
文字 列 の 片方 が 短 か く て 比較 が 途中 で 終っ た 場合 は , 短 か い 文字 列 の 方 が 
小さ く な り ま す 。 

文字 列 の 比較 に お いて は 空白 な ども 意味 を も ち ま す か ら 注 意 し て くだ さ 





い 。 

例 ) “AA' ぐ AB 
“BASIC" 三 "BASIC" 
XX&27X 半 " 
“PEN へ ウツ“PEN" 
"cm “CM 


“DESK' ぐ DESKS" 
この よう に , 文字 列 の 比較 は 文字 列 の 内 容 を 調べ た り , 文字 を アル ファ 
ベッ ト 順 に 並べ た り ( ソ ー ト ) す る こと に 使う こと が で きま す 。 
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1.13 


演算 の 優先 順位 


演算 は 次 の 順位 に よっ て 行わ れ ま す 。 


1 . 


ト つ ーー ーー 一 一 
O つ 。 必 CO k う 5 己 の 


o oo G の の 只 の 


カッ コ で 盟 ま れ た も の 
関数 
指数 (べき 乗 ) ^ 


IN 


号 ( 一 ) 


( 
( 
。/ 


に 、 


MOD 
| 

関係 演算 子 (<。>,。 = な ど ) 
NOT 

AND 

OR 

XOR 

IMP 

EQV 


1.14 エラ ーー メッセ ーー ツジ 


N so(N)-BASIC は , プロ グラ ム の 実行 を 中 断 さ せな けれ ば な ら な いよ う 
な エラ ー を 実行 時 に 検出 し た 時 , エラ ー メ ッ セ ー ジ を 表示 し て コマ ンド レ 
ベル に 戻り ます 。 

ダイ レク トモ ー ド で の エラ ー メ ッ セ ー ジ の 書式 は . 


人 人 X 


フロ グラ ム モ ー ド で の 書式 は , 
XX in NNNNN 


XX は エラ ー メ ッ セ ー ジ で ,。NNNNN は エラ ー が 検出 され た 行 番号 で す 。 
Nso(N)-BASIC の エラ ー コ ー ド と エフ フー メッセ ー ジ の 内 窒 に つい て は , 
付録 の "エラ ー コ ー ド 表 " を 参照 し て くだ さい 。 


1.15 画面 モー トド 


ここ で いう 画面 モー ド と は , 文字 を 表示 する テキ スト 画面 の 表示 桁 数 , 
グラ フィ ックス の 解像度 。 日 黒 モ ー ド か カラ ー モ ー ド か な ど と 画面 に 対す る 
操作 の すべ て の 意味 を 含む も の で す 。 N so(N)-BASIC は , この 画面 モー 
ド を 必要 に 応じ て 選ぶ こと が で きま す 。 

た だ し , Nso -BASIC は N-BASIC の すべ て の 画面 モー ド に 加え て , 高 解 


像 度 グ ラフ ィ ッ クス モー ド を 持っ て いま す 。 


1.15.1 N-BASIC の 画面 モー ド と 
低 解 像 度 グ ラフ ィ ッ クス 
(1) 文字 表示 桁 数 と グラ フィ ックス の 解像度 
N-BASIC で 許さ れる 1 画面 あたり の 表示 行 数 は , 20 行 と 25 行 で す 。 
また 1 行 に 表示 で きる 桁 数 は , 80, 72, 40, 36, 桁 が 許さ れ て いま す 。 
N-BASIC の グラ フィ ックス は , キャ ラク タ を 横 2 ドッ ト , 縦 4 ド ッ 
ト に 分 割 し た セミ グラ フィ ッ ク で す 。Ns。 -BASIC の も つつ 高 解像度 グ 
ラフ ィ ッ クス に 対し て , この グラ フィ ックス を 低 解 像 度 グ ラフ ィ ッ ク 
ス と いい ます 。 低 解 像 度 グ ラフ ィ ッ クス で は 根本 的 に 文字 を 表示 する 
テキ スト 画面 と グラ フィ ックス の 画面 を 区 別して いま せん 。 従っ て 低 
解像度 グラ フィ ックス の 解像度 は , 必然 的 に キャ ラク タ の 表示 桁 数 と 
行 数 に 依存 し ます 。 例 えば 80X25 文 字 の 画面 モー ド の 場合 , (80X 2 ) 
X(25X4) 必 160X100 の 解像度 と な り ま す 。 そ の 他 の 表示 桁 数 の 場合 
も 同様 に 計算 で きま す 。 次 の 表 は 表示 文字 数 と グラ フィ ックス の 解 像 
度 の 関係 で す 。 こ れ ら の 設定 は WIDTH を 使っ て 行い ます 。 
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テキ スト 画面 と 低 解 像 度 グ ラフ ィ ッ ク 画 面 の 解像度 









解像度 ( 横 X 縦 ) 
144x100 
(2) 曰 黒 モ ー ド と カラ ー モ ー ド 
N-BASIC は どの 文字 表示 桁 数 の 時 で も , 白黒 モー ド と カラ ー モ ー 
ド を 選ぶ こと が で きま す 。 
カフ ラー モー ド の 場合 , 8 色 の カラ ー を 文字 . ピク セル に 使う こと が 
可能 で す 。 た だ し , 前 記し た よう に N-BASIC の 低 解 像 度 グ ラフ ィ ッ 
クス は , キャ ラク タ に 依存 する セミ グラ フィ ックス 方 式 で すか ら , 1 
キャ ラク タ 内 の 複数 の ビク セル を 違う 色 で 指定 する こと は で きま せ 
ん 。 ま た 1 行 中 で , 20 回 以上 違う 色 を 指定 し て も 無視 され ます 。 
日 時 モー ド の 場合 は , プリ ンク や リバ ー ス な ど 6 つの ファ ンク ショ 
ン 【 機 能 ) を キャ ラク タ 単 位 に 設定 する こと が で きま す 。 
これ ら の 実際 の 設定 の 仕方 は 2 章 の COLOR , CONSOLE を 参照 し て 
くだ さい 。 


| 表示 文字 数 ( 横 X 縦 ) 





















1.15.2 Ngso-BASIC の 画面 モー ド と 
高 解 條 度 グ ラフ イッ クス 
1) テキ スト 画面 と グラ フィ ックス 画面 
Ns。 -BASIC で は , リス ト な ど と キャラ クタ 文字 を 表示 する テキ スト 


「」 
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画面 と 高 解像度 グラ フィ ックス を 表示 する グラ フィ ックス 画面 を 完全 
に 区 別して いま す 。 従っ て 個別 に それ ら の モー ド を 設定 する 命令 が あ 
り , 五 方 の モー ド を 変化 させ て も , も う 五 方 が 影響 を 受け る こと は あ 
本 
(2) テキ スト 画面 

この テキ スト 画面 の 機能 及び その 設定 は N-BASIC の テキ スト 画面 
の 場合 と 同様 で すか ら , 1.15.1 の “N-BASIC の 画面 モー ド と 低 解 像 
度 グ ラフ ィ ッ クス "を 参照 し て くだ さい 。 


(3) 高 解像度 グラ フィ ックス 画面 
Nso -BASIC の グラ フィ ックス 画面 は 大 量 の メモ リ (16K) に よっ て 構 
成 さ れ て お り 4 つの モー ド を 選ぶ こと が で きま す 。 ここ で それ ぞ れ 
の モー ド に つい て 語 明 し ます 。 
ハク ド 
640X200 ビ クセ ル の 解像度 で 使え る 色 は 軒 と , 8 色 の うち いずれ 
か 1 色 の 合計 2 色 で す 。 
・ ア トリ ビュ ー ト カラ ー モ ー ド 
640X200 ビ クセ ル の 解像度 で テキ スト 画面 の 色 と 8 色 の うち い ず 
れ か 1 色 が 使用 で きま す 。 
・4 色 カラ ー モ ー ド 0 
320X200 ビ クセ ル の 解像度 で 1 つの ピク セル に 4 色 の 色 が 指定 で 
きま す 。 そ の 色 は 3 色 ( 黒 , 赤 , 緑 ) が 固定 され 残り の 1 色 は 8 色 の 
中 か ら 任意 の 1 色 が 選択 で きま す 。 
・4 色 カラ ー モ ー ド 1 
4 色 カ ラー モー ド 0 と 同様 4 色 の 色 が 指定 で きま す 。 た だ し この 
と き の 色 は 青 , マゼンタ , シア ン の 3 色 が 固定 され , 残り の 1 色 は 
8 色 の 中 か ら 任意 の 1 色 が 選択 で きま す 。 


これ ら の 画面 モー ド ( グ ラフ ィ ッ クモ ー ド ) は CMD SCREEN で 指定 
され ます 。 


1.16 グラ フィ ッ ク 座 標 系 


1.15 の 画面 モー ド の 所 で 説明 し た よう に , 低 解 像 度 グ ラフ ィ ッ クス と 高 
解 父 度 グラ フィ ックス で は 解像度 が 異な っ て いま す 。 従っ て お の ず と それ 
ぞ れ の 座標 委 も 異な っ て き に 





1.16.1 低 解 父 度 グラ フィ ッ ク 座 標 系 
低 解 像 度 グ ラフ ィ ッ クス は N 一 BASIC , Na。。 一 BASIC の どちら の モー ド 
で も 使用 で きま す 。 低 解 像 度 グ ラフ ィ ッ クス は , 前 記し た よう に キャ ラク 
に 依存 す る セミ グラ フィ ッ ク 方 式 で すか ら , 画面 上 の 表示 文字 数 に より 
ビク セル の 解像度 が 決ま り ま す 。 横 の 文字 数 を x と し , 縦 の 行 数 を y と 
ie 
横 の 解像度 ( Lxn) ニ 2*x 
終 の 解像度 ( Lyn) ニ 4*y 
炊 に 各 座 標 の 画面 に 対す る 位置 で す が , キャ ラク タ 座 標 。 低 解像度 グラ 
フィ ッ ク 座 標 と も 画面 の 左上 が 原点 で ( 0, 0 ) で す 。80X25 の 文字 数 を 設 
定 し た と する と 各 座 標 の 位置 は 次 の 図 の よう に な り ま す 。 座 標 の 最大 値 は 。 
原点 が (0 , 0 ) か ら 始 まる こと に より , 必ず 各 解 像 度 一 1 と いう 値 に な り 
ます 。 


(0.0) 一 一 ーーーーーー(79。 0 ) (0.0 ) ーーーーーーーーーー(159。 0 ) 


低 解 像 記 グ ラフ ィ ッ ク 


ジ / 居 軸 太 
二 和 引 座標 系 





( 0 ,99 ) 
座標 系 


(0 , 24 ) 


デア 


80X25 設 定時 の る 






1.16.2 高 解像度 グラ フィ ッ ク 座 標 系 
高 解像度 グラ フィ ッ ク 座 標 系 も , 画面 の 左上 が 原点 ( 0, 0 ) で あり , 基 
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本 的 な 考え 方 は 低 解 像 度 グ ラフ ィ ッ クス と 同様 で す 。 た だ し , テキ スト 画 
面 と は 分 離さ れ て いて , 相互 十 歩 する こと は あり ませ ん 。 

高 解像度 グラ フィ ックス の 解像度 は , 320X200 と 640X200 の 2 つ で すか 
ら 各 モー ド の 座標 系 は 次 の 図 の よう に な り ま す 。 


(0,。 0) ーーーーーーー(319。0 ) (0.0 ) ーーーーーーー デ ーー (639。 0 ) 


320X200 640X200 


( 4 色 カ ラー モー ド 0,1 ) (モノ クロ モー ド , アト リ 


1 ビュー トカ ラー モー ド ) 





し 099 ( 0,199)】 


高 解像度 グラ フィ ッ ク 座 標 


1.17 ビュ ー ボ ポー ト 


1.1/.1 ビュ ー ボ ポート 


N so -BASIC で は 高 解 條 度 グ ラフ ィ ッ ク 画 面 内 に "ビュ ー ボ ポー ト を 設定 
す あ なの の が で きま す 。 

ビュ ー ボ ポー ト は , ディ スプ レイ 画面 上 の どの 領域 で 設定 され た 領域 を 表 
示す る か の 設定 で す 。 こ の 操作 は , 後述 する CMD VIEW に よっ て 行わ れ 
ます 。 





(0, 0) 


(200, 50 ) 


(400。150) 





( 639, 199) 
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この 図 で は , 絶対 座標 系 の (200, 50) か ら (400, 150) と いう 対角線 を も 
つ 四 角形 を ビュ ー ポ ボー ト に 設定 し て いま す 。 

この よう に ビ ピュー ボー ト と は ディ スプ レイ 画面 上 で グラ フィ ックス を 表 
志す る こと の で きる 領域 な の で す 。 一度 ビュ ー ポ ー ト を 設定 する と , その 
外側 の グラ フィ ッ ク 画 面 に は , いっ さい 表示 され る こと は あり ませ ん 。 ( 但 
し , 以前 に 表示 され て いた も の は その まま 残っ て いま す 。) 

従っ て ビュ ー ポ ー ト を 設定 する と いう こと は モニ タ の ディ スプ レイ 画面 
の 大 き さ を 設定 する の と 同じ と 考え る こと も で きま す 。 


ーー 
| 


ディス プレ イ 画 面 


表示 され な い 





この ビュ ー ボ ー ト 内 の 座標 系 を ビュ ー 座 標 系 と いい ます 。 こ の ビュ ー 応 
標 は ビュ ー ポ ー ト の 中 に の み 存 在 す る も の で , この 座標 系 の 各 点 は ディ 
スプ レイ 画面 の 1 ピク セル に 対応 し て いま す 。 こ の 座標 系 で は , ビ ュー ポー 
ト の 左上 の 頂点 が 必ず 原点 (0 , 0 ) に 設定 され , そこ か ら 画 面 上 の 各 ピ ク 
セル を 座標 の 1 点 と し て 物理 的 に 展開 され ます 。 

また だ た ビュー ボー ト と いう 概念 は Ns -BASIC で の み 通 用 する も の で す 。 
会 っ て N-BASIC に は , ビュ ー 座 標 系 と いう も の は 存在 し ませ ん 。 


1.17.2 座標 率 の まとめ 

ここ で 色々 な 座標 系 の 整理 を し て お きま し ょ う 。 次 に 示す 図 は それ ぞ れ 
の 座標 系 の 関係 で す 。 ま た 各 座 標 系 の 下 に 列挙 され て いる の は , 第 2 章 で 
説明 する 命令 の うち で , その 座標 系 に 対し て 働く も の で す 。 
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回 





キャ ラク タ 座 標 系 グラ フィ ッ ク 座 標 系 
LOCATE ー ン ン PP 
LINE 
GET @ 低 解 人像 度 グ ラフ ィ 高 解 像 度 グ ラフ ィ 
PUT @ の ク 座標 ツ ク 座 標 
CMD COLOR@ PSET 
LINE CMD VIEW CMD PSET 
GET@ STATUS VIEW CMD PRESET 
PUT@ CMD LINE 
POINT CMD CIRCLE 
CMD PAINT 
CMD POINT 
CMD GET@ 
CMD PUT@ 
STATUS POINT 
キャ ラク タタ 座標 系 


テキ スト 画面 に 存在 する 座標 , 座標 の 1 点 は 1 キャ ラク タ に 対応 
する 。 
グラ フィ ッ ク 庫 標 系 

グラ フィ ッ ク 画 面 に 存在 する 座標 , 以下 の すべ て の 座標 を 含ん だ 
意味 で 使わ れる 概念 的 な も の 。N so (N)-BASIC の 場合 は . 各 ビ クセ 
ル に 対応 し た 座標 こし て 使わ れる 。 





ビュ ー ボ ポート を 設定 し た 時 に 。 ビュ ー ポ ー ト 内 に 存在 する 座標 。 
絶対 座標 系 


ディ スプ レイ 画面 の すべ て を ビュ ー ポ ー ト と 考え た 時 の ビュ ー 


卒 標茶 。 
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1.17 で 色々 な 座標 系 を 説明 し まし た が , ここ で は それ ら の 座標 系 に 対し 
て 種々 の グラ フィ ッ ク 命 令 を 使う 場合 の "座標 の 指定 の 仕方 "を 説明 し ま 
す 。 

最も 一 般 的 な 座標 の 指定 は "絶対 座標 "に よる も の で , N ss(N)-BASIC で 
の 座標 指定 は , 普通 どの 座標 系 (キャ ラク タ 座 標 系 , ビュ ー 座 標 系 ) に 対し 
て も この 指定 に より 行い ます 。 ただし, Ns-BASIC の ビュ ー 座 標 系 に 対 
し て の 座標 の 指定 に は , 相対 座標 に よる 方 法 も 許さ れ て いま す 。 

炊 に この 2 つの 指定 の 仕方 に つい て 説明 し ます 。 











1.18.1 絶対 座標 に よる 指定 の 仕方 

絶対 座標 と は , XX 座標 , Y 座 標 が 決ま る こと に よっ て 一 意 的 に 決ま る 座 
庁 の こと で す 。 例え ば , 下図 の よう な 座標 が あっ た と する と , 左上 の 頂点 
は 常に (0, 0 ) で あり , 右 下 の 頂点 は 常に (639, 199) で す 。「 絶 対 座標 に 
よる 指定 と は この 絶対 座標 を 使っ て 位置 を 表す 方 法 を いい ます 。 





gc 





(639, 199)| 





絶対 座 林 


これ は 最も 一 般 的 な 指定 法 で , Ns(N)-BASIC が 持つ すべ て の 座標 系 に 
対し て 有効 で す 。 2 章 で 解説 する グラ フィ ッ ク 命 令 な ど に お いて 座標 指定 
する : 普通 は この 方 法 に より 行い ます 。 例えば, CMD PSET( Hx, Hy) 
と いう 命令 は ビュ ー 座 標 系 内 の 1 点 に ピク セル を セッ ト す る 命令 で す が , 
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これ は 次 の よう に 書く こと が で きま す 。 
CMD PSET(100, 100) 
この 場合 。 ビ ュー 座標 の (100, 100) に ビク セル が セッ ト さ れ ま す 。 そ の 
他 の 命 欠 の 場合 も 絶対 座標 に よる 指定 で は , すべ て この よう に ( X, Y) と 
いう 形 に な っ て 表 さ れ ま す 。 


1.18.2 MM に よる 指 時 MP 

N s -BASIC の 座標 系 に 対す る グラ フィ ッ ク 命 令 で の 座標 指定 に は ," 相 
対 座 標 に よる 指定 ' ' が 許さ れ て いま す 。 

“相対 座標 "と は , 座標 系 内 の ある 1 点 を 基点 と し た 時 , X 方 向 , Y 方 向 
に どれ だ け 相 対 的 に 移動 する か に よっ て 決め られ る 座標 で す 。「 相 対 座標 
に よる 指定 "と は , この 相対 座標 を 使っ て 位置 を 表す 方 法 を いい ます 。 
例え ば 。 次 の よう な 座標 系 が あり , 基点 が (320, 100) に 設定 され て いた 
と する と 。, 左上 の 頂点 は (一 320, 一 100) で あり 右 下 の 頂点 は ( 十 319, 十 99) 
と な る 訳 で す 。 


6 ーーーーーーーーーーーー 639(X ) 


MK 一 320, 一 100) 
茜 : 点 


(320。 100) 
( 十 319。 十 99) 





相対 座標 


この 指定 法 の 優れ て いる 点 は , 相対 移動 量 を 表す ( x, y) は 淀 に 同じ 値 で 
本 千本 泊 の 村 お 0 全 時 演 人 間 お 
SS ee 

Ns -BASIC は この 基点 に 当たる も の と し て . Last referenced Point (以降 
*LP'" と 略す ) を 持っ て いま す 。 こ の LP は 最後 に 参照 され た 座標 と いう 意 
味 で 。 グ ラフ ィ ッ ク 命 令 で 座標 を 与え た 場合 , 最後 に 指定 され た 座標 を 値 
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こし て 持ち ます 。 
例え ば , CMD PSET( Hx, Hy) と いう 命令 が 実行 され た 場合 , LP は (Hix 
Hy) と いう 座標 に 設定 され る こと に な り ま す 。( 2 章 。CMD POINT. STA- 
TUSPOINT 参 照 。) 
N ss -BASIC の グラ フィ ッ ク 命 令 で 相対 座標 を 使っ て 座標 指定 を 行う 場 
合 は , 次 の よう な 書式 に な り ま す 。 
例 ) CMD PSET STEP( x, y 
これ は ドッ ト を セッ ト す る 命令 で す が そ の 他 の 場合 も 同様 で , 座標 を 表 
す ( x, y) の 前 に "STEP" を 付け て (x, y) が 相対 量 で ある こと を 表し ます 。 
Ns -BASIC の グラ フィ ッ ク 命 令 で 相対 座標 の 指定 が 許さ れ て いる の は 
的 に 示す 命令 で す ( お の お の の 命令 の 機能 に つい て は 2 章 で 説明 し ます )。 
CMD PSET CMD PRESET 
CMD LINE CMD PAINT 
CMD CIRCLE CMD POINT 
CMD GET@ 





1.19 カラ ー 


1.19.1 N-BASIC の カラ ー 
N-BASIC の カラ ー は 凌 , 青 , 赤 . マゼンタ , 緑 , シア ン , 黄 , 白 の 8 


色 を 使う こと が で き , それ ぞ れ 下記 の カラ ー コ ー ド に よっ て 柏 定 し ます 


0 ] 2 3 4 5 6 7 
串 育 赤 マゼンタ 緑 シア ン 黄色 白 
カラ ー コ ー ド 


だ ただし, これ ら は , 画面 モー ド " の 所 で 説明 し た よう に , あく まで キャ 
ラク タ 単 位 で し か 指定 する こと は で きま せん 。 従っ て 。 キャ ラク タ 文 字 を 
1 文字 ずつ 塗り 分 ける と いう こと は で きま す が , 低 解像度 グラ フィ ックス 
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の 場合 1 キャ ラク タ 内 の 隣接 する 複数 の ビク セル を 違う 色 で 塗り 分 ける こ 
の 続 で きま 性 ん た ん 。 

その 他 , 1 行 中 で 20 回 以上 の カラ ー 指 定 を 行っ た 場合 , そ れ 以 降 の カラ ー 
は 無視 され , 最後 に 指定 し た カラ ー が 有効 と な り ま す 。 

次 の 図 は 以上 の 説明 を 示し た も の で す 。 こ れ ら カラ ー の 設定 に つい て は , 
COLOR, CONSOLE の 項 を 参照 し て くだ さい 。 


fe 
細 拉 プロ な る 。 






ーー1 行 中 で 20 回 以上 の 
_- カラ フラー 指定 を し て も 
1 キャ ラフ クタ | 無視 され る 。 


1.19.2 Nso-BASIC の カラ ー 
Ns0 -BASIC の カラ ー は カラ フー コー ド て で 指定 する も の と , カラ ー ナ ン バ 
で 指定 する も の と 2 種類 あり ます 。 カ ラー コー ド は N-BASIC と 同じ で , 
主 に テキ スト 画面 に 対し 色 指 定 を 行ない , 色 は 8 色 ま で 使用 で きま す 。 ま 
だ た, カラ ー ナ ン バ は 高 解像度 グラ フィ ックス に 対し て 色 指 定 す る と き に 使 
用 し ます 。 モ ノ ク ロ モー ド , アア トリビュー トカ ラー モー ド の と き は 2 人 色 まで 
(0, 1 ), 4 色 カ ラー モー ド の と き は 4 色 ま で (0, 1, 2, 3 ), 指定 で きま す 。 
後述 する CMD SCREEN に よっ て これ ら の モー ド が 決定 され ます 。 
カラ ー コ ー ド で 指定 を 行う も の 
PSET 
PRESET 
LINE 
PUT@⑨ 
COLOR 
CMD COLOR@ 
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カラ ー ナ ン バ で 指定 を 行う も の 
CMD PSET 
CMD PRESET 
CMD LINE 
CMD CIRCLE 
CMD PUT@ 
CMD COLOR 
詳し く は PC 一 8001MKI ユ ー ザ ー ズ マニ ュ ア ル を 参照 し て くだ さい 。 


1.20 ファ イル 

ファ イル と は 意味 を 持つ 情報 の 集まり で , N ss(N)-BASIC は フロ ッ ピ イィ 
ディ スク や カセ ッ ト テ ー ブ と の 入出 力 を 行う 時 , ファ イル を 一 つの 単位 と 
し て 管理 し ます 。 フ ァイル に は デー タフ ァイル と プロ グラ ム フ ァ イル の 2 
つが あり ます 。 

さら に フロ ッ ピ ィ イィ ディ スク 上 の デー タフ ァイル を 使用 する に あたっ て . 
その ファ イル に ファ イル 番号 を 割り 当て , ファ イル 番号 で ファ イル の 入力 
出力 を 行う た め 能 率 よ く フ ァイル 操作 を 行う こと が で きま す 。 


1.20.1 ファ イル 名 

〈 フ ァイル 名 > と は フロ グラ ム フ ァ イル や デー タフ ァイル に 付け る 名 前 
で , これ は ユー ザ が 指定 し ます 。 ファ イル 名 を 必要 と する の は , カセ ッ 
ト テ ー ブ , フ ロッ ピ ィ ディ スク な ど 補助 記憶 装置 と の 入出 力 を 行う 場合 で , 
その 他 の 場合 は 省略 する こと が で きま す 。 フ ァイル 名 は 次 の よう な 書式 を 
こり ます 。 

<〈 フ ァイル 名 > [ . ] 〔< 拡 張子 >〕 

最初 の く (ファ イル 名 〉 は 6 文字 ビリ オド に 続く < 拡張 子 >? は , も し あれ ば 
3 文字 まで の 文字 列 よ り 構成 され ます 。 も し それ ぞ れ の 文字 数 が それ 以下 
の 場合 に は 空い た 部 分 に 空白 が 埋め られ ます 。 一 般 に く フ ァイル 名 >〉 が ファ 
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イル の 名 前 を , < 拡張 子 ? が ファ イル の 性 質 を 表す よう に し ます が , ユー ザ に 
よっ て 自由 に 使う こと が で きま す 。 通常 ファ イル 名 と 言う 場合 は < 拡張 
子 > ま で 含ん だ も の を 意味 し ます 。 

た だ し , コロ ン (:) 及 び キ ャ ラク タコ ー ド 0 と 255 で 表 さ れる 文字 を 含む 
こと は 許さ れ ま せん 。 

また 最初 の く < ファ イル 名 〉 が 6 文字 を 越え て 指定 さ た 場合 , 先頭 か ら 6 文 
字 が < ファ イル 名 > と, 続く 9 文字 まで の 3 文字 が < 拡張 子 > と 兄 な され , そ 
れ 以 降 の 文字 は 無視 され ます 。 

< ファ イル 名 > の 先頭 に ドラ イブ 番号 を 指定 し ます 。 ド ライ ブ 番 号 こ と く 〈 フ ァ 
イル 名 〉 は コロ ン ( : ) で 区 切ら れ ま す 。 ド ライ ブ 番 号 が 1 の 場合 は 省略 する 
こと が で きま す 。 
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2 章 の みか た 


2 章 で , Ns -BASIC, N-BASIC の すべ て の コマ ンド , ステ チ テー トメント, 


関数 , 予約 変数 





一 表記 例 


を 解説 し ます 。 
ペー ジ を あげ て , この 中 に 使わ れ て いる 記号 や 


1 


こ KILL と いう コマ ンド を 解説 し た 
記 方法 の 説明 を し ます 。 





KILL 層 We 一 般 コ マン 





6⑥9G③@ @ 








ディ スク 


①[s 











フロ ッ ピ ィ デ ィ ス ク 上 の ファ イル を 削除 し ます 。 

KILL < ファ イル 名 > 

KILL "2:tes ぜ 

s < ファ イル 名 〉 で 指定 し た ファ イル を フロ ッ ピ イィ ディ スク か 
ら 削 除 し ます 。 

。 削除 する ファ イル は クロ ー ズ され て いな けれ ば な り ま せ 
ん 。 もし, オー プン 状態 の ファ イル を 削除 し よう と する と 
"File already open" エ ラー が 起り ます 。 ま た , 書き 込み 禁止 属 
性 の 付け られ た ファ イル を KILL で 削除 し よう と する と “File 
write protected" エラ ー が 起り ます 。 こ の 場合 SET で 書き 込み 
禁止 属性 を 解除 し て か ら KILL を 実行 し て くだ さい 。 

・KILL で は 1 度 に 1 つの ファ イル し か 削除 で きま せん 。 

*・ KILL は すべ て の ディ スク ファ イル (プロ グラ ム , ラン ダム 
ファ イル , シー ケン シャ ルフ ァイル ) に つい て 便 用 で きま す 。 
ドラ イブ 番号 は ファ イル 名 の 前 に nm : "と 指定 し ます 。 省略 
され た とき は ドラ イブ 1 が 指定 され た と みな され ます 。 し だ 
が っ て 複数 の ドラ イプ の 中 に 同じ ファ イル 名 で 指定 され だ フ 
ロッ ピ ィ ディ スク が ある 場合 注意 が 必要 で す 。 

SET, ATTR$ 





tnD OPEN 取 ス バス 全 FUR DUTPUT A 革 
110 PRIRT | 日間 還 【 イ トイ) | 3 二 + ! 1 
120 CLOSE 


140 FILES#PRINT 
KIEL "twmt2" 
1 F TLE ち 5 


- の マー ク が つい て い ろ も の は DISK-BASIC モー ド で な いと 


使え ませ ん 。 マー ク の つい て いな いも の は DISK-BASIC モ ー ドド , 
ROM-BASIC モ ー ド の どちら で も 使え ます 。 





Nso -BASIC で 使え る こと を 示し ます 。 


N-BASIC で 使え る こと を 示し ます 。 
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①ー③ の マー ク の 組み 合わ せ に よっ て 以下 の よう な モー ド で 使え る こ 


と を 示し ます 。 


Ns0 -BASIC. N-BASIC. Ns DISK-BASIC., DISK-BASIC 





Nso -BASIC, Nso DISK-BASIC 


8 y Ngl IN Nso DISK-BASIC, DISK-BASIC 


ディ ニク ' 





ディ スク 


N seDISK-BASIC 


[| IN 半 加 DISK-BASIC 


機能 別 分 類 


BASIC の コマ ンド ・ ス 


で ある か どの よう な 


一 般 コ マン ド 


一 般 ス テー トメ ン 


入出 力 コマ ンド 
入出 力 ス テー トメ ント 


入出 力 関数 


1 し 





クラ フィ ックス テー ト 


メン ト 





画面 制御 関 


数 値 関数 
文字 関数 


文字 ステ ー ト メン 


特殊 ステ ー ト メ 
特殊 関数 


ント 


ト /) 





テー トメ ント ・ 関 
機能 を も つも の か を 示し ます 。 








・ 馬 約 変数 の うち の どれ 


プロ グラ ム を 作る , 動作 させ る , 停止 
させ る , 変数 な どの 定義 を す 
> 基本 的 な 動作 や . プロ グラ ム の 流れ 


の ) コ ント ロー ルル (ループ や 分 岐 ) を 行い 


7 o 


2 00 ポッ スク 昌 の NN 2 クウ 
ト テ ー プ レコ ー ダ , 画面 、 キ ー ボ ー ド , 
プリ ンダ 。 スピ ー カ , RS-232C ポ ー ト な 
ど の 操作 を 行い ます 。 


Py クス, 
メグ ォ ルッ グズ ス に 用 いま すず す 。 














7 テキ スト 画面 、 グ ラフ ラフィ ッ クス 画面 の 
アー で 生ま も ーー 





算術 演算 と 文字 列 の 操作 を 行い ます 。 





未 を 側 き を し ます 
が 専用 に 使っ て いる 変数 で す 。 








の 


機能 を 簡単 に 示し ます 。 
記述 方 法 の 定義 を 行い ます 。 以下 の 規 旧 





に 会 っ て くだ 





力 する 文字 は 大 文字 で も 小文字 で も か まい ませ ん 。 
た だ し , 次 の 場合 は , 大 文字 , 小文字 を 区 列 し な けれ ば な り ま せ 
ん 。 
1 ) ダブ ルク ォ ー テ ーション マー ク ( “ ) で 囲ま れ た 文字 列 は 必ず 
大 文字 ・ 小 文字 を 区 別 し な けれ ば な り ま せん 。 
例 ) YMARK2", “format.N80” (ファ イル 名 ) 
SET1,“P” (属性 文字 ) 
数 値 を 指数 形式 で 表わす 場合 に 用 いる E と D は 必ず 大 文字 で な 
けれ ば な り ま せん 。 
例 ) A! ニ ー7.09Eー06 
A せ ー1.094328564D5 
カギ カッ コ “<?。 パ > で 囲 まれ た 項目 は その 定義 内 容 を ユー 
ザ が 具体 的 に 指定 し ます 。 
次 の よう な 種類 が あり ます 。 
< 数 式 > : 数 値 定数 や 数 値 変 数 を , 単 衝 で ある い は 演算 
子 で 結合 し た も の 。 
例 ) 1 10, 1/SIN(AU), B2, C*D 
く 文字 列 > : 文字 定数 ある い は 文字 型 変数 。 
例 ) “ABC", STS$ 
< 式 > ・ < 数 式 > ま た は く < 文字 列 > 
機能 >, < スイ ッ チ >, く コード >: 


0, 1, 2, 3 な どの 整数 で . コマ ンド や ステ ー ト 
メン ト の 機能 を 指定 する も の 。 
< ファ イル 名 >: 。 カセ ッ ト テ ー プ や フロ ッ ピ ィ イデ ヂ ディ スク 上 の フ 
ァイル を 表わす 名 前 で “ドラ イブ 番 : 
イル 名 . 拡張 子 " の 形式 を 持つ も の 。 
例 ) “MERGE", “3 : backupN80" 
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1 Py 
た よる ケッ ye NAM の 
枯 計 5 プン せ ず に 使 
い 。 く < ファ イル 番号 > ニー1 で ある 。 
〈 く ドラ イブ 番号 >: フロ ッ ピ ィ イデ ヂ ディ スク ユニ ッ ト の 各々 の ドラ イ 
プ に 割り 当て られ る 番号 。 
BE な 8 色 の 色 に つけ られ た 番 





0: 半 1 : 青 2: 赤 3: マ ゼン タ 
4 ・ 緑 5 : シ アン 6 : 茸 7・ 白 
〈 く カラ ー ナ ン バ > : PWM リィ に お いて 使用 可能 


色 に つ 





(Hx, Hy) が 人 ックス 座標 
(Lx,Ly) : 低 解像度 グラ フィ ッ クス 座 禁 
STEP(x, y) : 相対 座 様 


3。 角 カッ コ ” [ , ” 」 で 囲ま れ た 項目 は .。 オプ ショ ン で あり 省 
略 する こと が で きま す 。 省略 し た 場合 , プ フォ ルト 値 (BASIC に よ 
っ て 設定 され る 値 ) ま た は 以前 に 指定 し た 値 が 適用 きれ ます 。 

4 . 省略 記号 "… の 続く 項目 は , 1 行 の 許す 長 さ (255 文 字 ) の 内 で 任 
意 の 回 数 繰り 返す こと が で きま す 。 

例 ) < 定数 > 〔, く 定数 >…〕 の 場合 0, 10, 15 

5 . へ は スペ ー ス を 表わし ます 。 

_ 例 ) 実際 の 入力 の 見 本 と し て 簡単 な 例 を 示し ます 。 
RM 

けれ ば な い 点 な ど を 説明 し ます 。 
特に 注意 し て ほし い 点 を 示し ます 。 
関連 の 深い 項目 を 示し ます 。 

ラム ノリ いく つか の 文 を 変 Z た プロ グラ ム 例 と その 実行 結果 を 

示し ます 。 
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ABS 数 値 関数 


機能) 絶対 値 を 与え ます 。 

ABS( < 数式 >) 

文例 ) BーABS(-8) 

・ absolute の 意味 で , < 数 式 > の 絶対 値 を 与え ます 。 
・ ABS 関 数 の 演算 結 示 は, < 数 式 > に 倍 精 度 実数 が 含ま れる 
場合 は 倍 精度 に , その 他 の 場合 は 単 精度 と な り ま す 。 











(の 100 “-- 2 テン カン / キョ リ ヲ モト メル ーー 
還 還 還 還 還 110 INPUT “テン 1 ノ サ " ヒ ョ ウ ルル: xy 5X1。Y1 
120 INPUT “チン 2 / ササ "ヒョウ 八 : xy 3X2。Y2 
130 D=SQR(ABS(X1-X2)^2+ABS(Y1-Y2) ^2) 
140 PRINT:PRINT "テン 1 ト テッ 2 ノ キ ョ リ 中 "jiD 


Fun 
テン 1 ノ サ * ヒ ョ 9 八 : xy ? 0,0 
テン 2 ノ サ " ヒ ョ 9 八 : xy ? 60,80 


プン 1 ト テン グ ノ キ ョ リル 100 
0k 











ASC 文字 関数 


文字 を 対応 する キャ ラク タコ ー ド に 変換 し ます 。 


ASC(< 文 字 列 > ) 
BーASC("A") 
・ < 文字 列 > の 最初 の 文字 を , 対応 する キャ ラク タコ ー ド に 


急 換 し ます 。 


< 文字 列 y》 に ヌル スト リン グ を 与え た と き に は , "Tegal 


function call" エ ラー が 起り ます 。 


CHR$, 付録 じ セキ ャ ラク タコ ー ド 


100 
110 
1 20 
130 
140 
1 っ 0 
160 
170 
180 
190 
2Z00 
Z10 


デ HF 


- 仙 SC 

ーーー 1oueFr こ Chr。 -> upper chr。 一 
INPUT As$ 

IF A ま =”"” THEN 120 

B$="・ 


FUR IT=1 TO LEN(A ま ) 
DU ま =MTU も (AA も  」1 ) =ASC( DD まま ) 
IF DU く 97 OR DU>122 THEN B ま =B ま +D ま : GOUTO 190 
B ま =B ま +CHR ま (ロー32 ) 

NEXT 

PRINT:PRINT B ま 

END 


7 nec pc-8001mk2 


NEC PC-8001MK2 


Uk 

ビ Un 

7 英 光 天天 。 D 選 ビ SOhal CO ロロ 七 ビ 区 区 区 区 
※※ 。 PERSUNAL COUMPUTER  ※※ 天 区 
Uk 


ATN 数 値 





(文例) 





関数 








送 正 接 ( ア ー ク タン ジェ ント ) を 与え ます 。 
ATN( < 数 式 >) 
AーATN (1) 
・ < 数 式 > の 単位 を ン ( ァ /180X 角 度 ) と し た と き の 逆 
_ 正 接 ( ア ー ク タン ジェ ント ) を 与え ます 。 
・ 得 ら れる 値 は ーz/2 か ら ァ r/2 ま で の 範囲 と な り ま す 。 
・ ATN 関 数 の 演算 は 単 精度 で 行わ れ ま す 。 
100 “-- acTAN カラ arcSIN。arcCOS ヲ モト メル ーー 
110 「『= 180/ う 3 14159 ょ U1 も ニー ” 析 。 福 柏 補 "2 も = 大林 。 栖 栖 神 枯 村 林 昔 。 章 柱 " 
120 INPUT "arcTAN"jA 
130 IF ABS(A)>1 THEN 120 
140 IF ABS(A)=1 THEN AS=1 。5708:AC=0 GOTOU 170 
150 AS=ATN(A/SQR( 一 AA+1 ) ) 
160 ACEC=-ATN(CA/SGR( 一 AA+1) )+3 。14159/2 
170 DS=ASxT iC=AC※T 
180 PRINT * Rad. Deg・.・ 
190 PRINT "arcCOS( "siUSING U1 ま Ai iPRINT ") = USING U2 ま 3ACiDC 
200 PRINT "arcSIN( "jiUSING U1 ま も :AiiPRINT ”「) = j:USING U2* ま ASiDS 
210 END 
PF1 
arc「AN? 。5 い 
Rad。 Ueg・ 
acCOS(0 。500 ) = 1。.0472 60 。00 
acSIN(U.500 ) = 0D。5236 30 .UO 
、 Uk 
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国 了 IN| 入出 力 関数 


指定 し た ファ イル , また は , ドラ イブ の 属性 を 与え ます 。 


ATTR$ | (< ドラ イブ プ 番 号 > ) 
( 韻 く ファ イル 番号 >) 
| (< ファ イル 名 >) 


PRINT ATTRS$ (1) 


・ 指定 し た ドラ イブ に 入っ て いる フロ ッ ピ ィ イデ ィ ス ク 。, 
《 フ ァイル 番号 >? に よっ て 指定 され た オー プン され て いる ファ 
イィ ル , 〈 フ ァイル 名 >〉 で 指定 され た フロ ッ ピ ィ イィ ディス ク 上 の 
ファ イル の 現在 の 属性 を 3 文字 の 文字 列 で 与え ます 。 属 性 を 
表わす 文字 は 次 の よう な 意味 を 持ち ます 。 


“人 人 へ へ": 属性 は なし" です 。 す な わ ち , 通常 の リー ドラ 
イ ト が 可 月 肥 な 状態 で す 。 


TR 人 人 へ": 書き 込み の と き に , リー ドア フタ ー ラ イト (書き 
込ん だ 内 容 ヒ と メモ リ 上 の 内 容 の 比較 チェ ッ ク ) を 
行い ます 。 

"へ 人 へ P" : 書き 込み が 禁止 され て いま す 。 


SET 


100 “-- ATTRIBUTE CHECK ーーーー 

110 INPUT file names 計 ま 

120 IF MID ま (F ま も ,2 1) く >"』 |) THEN 150 

130 DR=VAL(F$) : F1 $= MID*(F*。 づ ) 

140 GOTO 160 

150 DR=1 :F 1 =F ま 

1 60 AT も =ATTR ま (DK ) 

170 PRINT "drive 3STR ま (DR ) : a 七 モ に 1 ュ buts : 3sGUSUB 220 
180 IF MID ま (F も ,。3)="”" THEN 210 

190 AT$= ATTR$(F$) 

200 PRINT F1: att と Fibute : "isGO0SUB 220 
210 END 

220 A*= "None “ 

230 IF AT ま ="R  " THEN A$="Read a 和 fter urite'" 
240 IF AT まま =" P" THEN A ま = "MMFite protect" 
250 PRINT A ま 

260 RETURN 

どい ロ 

Ti le namei: ? モ 己 

dd ビュ ソ 1 aa 上 モ ビュ bute 》: None 

te ヨコ 七 a 上 上 上 ュ 1bute : Read a 和 Tter urite 

Uk 


AUTO [MIN| 一 般 コ マン ド 





行 番号 を 自動 的 に 発生 させ ます 。 
AUTO〔< 行 番号 >]〔, < 増分 >〕 
AUTO 100, 20 


( 支 例 ) 


解説 ・。 AUTO コマ ンド は , 指定 され た < 行 番号 〉 を 最初 の 行 番号 





と し , 以後 キー の 入力 ご と に < 増分 〉 で 増加 され 
た 行 番号 を 発生 させ ます 。 

。 < 行 番号 〉。< 増 分? は , 0 一 65529 ま で (< 増分 > は 1 一 ) 
の 整数 で あり , 指定 の な いと き は , それ ぞ れ 10 と 見 な され ま 
す 。 

・ CTRL し 一 C じ または, スト ッ プ キー を 押す と , AUTO コマ 
ンド は その 動作 を 中 止 し , BASIC の コマ ンド レベ ル に 戻り ま 
す 。 この 時 。 最後 に 発生 させ た 行 番号 の 行 は 格納 され ませ ん 。 
。 AUTO コマ ンド の 動作 中 に お いて , 既に 表示 され て いる 
行 を , カー ソル を 移動 し て 修正 する こと は で きま せん 。 
AUTO コ マン ド を 終了 し て か ら 修 正 し て くだ さい 。 





auto 100,20 

100 “-- ea 七 一 一 

120 Print auto 上 e ョ セ " 
140 end 


100 "一 - tes セ 七 一 一 

120 PRINT “auto test" 
140 END 

0 に 
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BEEP IN| 入出 力 ス テー トメ ント 


内 蔵 ス ピー カ に より ブザー を 鳴ら し ます 。 
BEEP[ く < スイ ッ チ >]〕 


BEEP 


能 











り , 


し だ だ の と 同じ で 。, 


内 蔵 ス ビー カ か ら 音 を 出し た り , 止め た り し ます 。 

〈 ス イッ チ > の 値 が 1 の と き ブ ザー は 鳴り っ ぱな し と な 
AX イツ チッ 0 で 上 まり まう 。 

〈 ス イッ チ >〉 を 省略 し た 場合 に は , PRINT CHR $(7) を 実行 
0 5 秒 ) ブ ザー を 鳴ら し ます 。 


付録 H コ ント ロー ルコ ー ド 


100  -- bell 1 -- 
110 FOUR 1!=1 TO 50 
1 20 BEEP 1 

130 BEEP 0 

140 NEXT[ 

150 GUSUB 2Z80 

160  - 一 ーー 


170 
180 
190 
2Z00 
Z10 
ZZ0 
230 
Z40 
Z50 
Z60 
2Z70 
280 
Z20 
300 


el 1 
FUR =1 「0 30 
FUR J=] TOU 30 
BEEF 1 
NEXT J 
BEEP 0 
NEXI 
5USUB ZS0 


PRINT CHR ま (7 ) 

END 

"ーー 81 七 POu モ ine ーー 一 
FUR J=0U TO 200 

NEXT J 

RE TURN 


CDBL IM(N| 数 値 関数 


整数 値 , 単 精度 実数 値 を 倍 精度 実数 値 に 変換 し ます 。 


1 





CDBL (< 数 式 > ) 
- 例 )  A 半 一 CDBL(B! * 2) 
解説 ) ・ < 数 式 > の 値 を 倍 精度 実数 値 に 変換 し ます 。 但 し , 型 変 * 


が 行わ れる だ け で 有効 桁 数 の 変化 は あり ませ ん 。 


結果 の 値 の 精度 は , 変換 する 前 の 型 と 同じ (整数 型 な ら 


整数 部 の み , 単 精度 実数 型 な ら 有 効 数 字 6 杵 ) に な り ま す 。 


CINT, CSNG 


100 
110 
1 20 
130 
140U 
150 
160 
170 
180 
190 
Z00 
210 
2Z0 
230 


PU「] 


1 ,.Z3456 
1 23456 
1 , 23456E+08 


Uk 


- CDBL 

ーー ] コ " サ / ナイ 敗 " イ セイ ト "、。 う " ゅ スリー へ ヘ / ヘン カン ーー 
Al =1 。23456 GOUSUB 160:GOSUB 220 

Al =123456! :GO0SUB 160:GOSUB 2Z20 

Al=1 。23456E+O08: GOSUB 160:GOSUB 220 
END 

A ま =STR$ ま (AA ) :A1f= ニ CDBLCA!) 
D=INSTRCA も 。 。 ) 

{IF D=O0 OR INSTR(A ま も ,。 E” ) く <>0 THEN A2t=A1 拉 iRKETURN 
D=LEN( A も ) 一 D 
A2#=INT(CDBL(AIX10^D+.5) )/10"H 

RETURN 

PRINT Al,A1 提 TAB(34 ) : A2 

RKETURN 


1 , 23455980710003 
1 23456 
123456000 


1 , 234559893608093 
1 23436 
1 23456000 





ーー 
\ ヽ ブロ 





バ 
IN 
ト で 


IN) 文字 関数 


キャ フク タコ ー ド を 対応 する 文字 に 変換 し ます 。 
CHRS( く < 数 式 >) 
A$= ニ CHRS( 236 ) 


< 数 式 > の 値 を キャ ラク タコ ー ド と し , 対応 する 文字 , ま 


た は コン トロ ー ル コー ド に 変換 し ます 。 


〈 数 式 > は, 0 一 255 ま で の 範囲 で な けれ ば な り ま せん 。 


ASC, 付録 尼 キャ ラク タコ ー ド 


100 
110 
1 20 
130 
140 
1 っ U 
160 
1 70 
180 
190 
Z00 
Z10 


"UHF 


- ASC 
"ーー 1ouer chF,。 -> 
INPUT A$ 
IF As="… 
ロ あ ニ "・ 
FOUR =1 TO LEN(A) 
U ま =MIDU 和 も (A ま 1) iD=ASC(D$*) 
IF U く 9Z OR D>122 THEN B ま =B ま +D ま :GOUTO 190 
B ま =B ま +CHR ま (-32 ) 
NEXT 【I 
PRINT:PRINT B$ ょ 
END 


ロロ ほら じ と れ ロビ 。 一 一 


THEN 120 


7 nec pc-8001mk2 


NE し PC-8001MK2 
Uk 


ロロ 
の 半 光 区 区 


U ト 


鞍 基 英 区 


PG じ SOha 1 COmDuU 七 G ビ 区 区 区区 


PERSUNAL CUMPUTER  ※%※※ 


CINT ( 頒 人 数 値 関数 


単 精度 実数 値 , 倍 精度 実数 値 を 整数 値 に 変換 し ます 。 
CINT(< 数 式 > ) 
文例) A=CINT(B 壮 *2) 





・ < 数 式 > の 値 の 小数 部 分 を 切り 捨て て 整数 に 変換 し ます 。 
* 結果 の 値 が 一 32768 一 32767 の 範囲 に な いと き に は , 
"Overflow" エラ ー が 起こ り ま す 。 





CSNG, CDBL 


1000 “ーー ショ ウス ウ テ ン イカ ニン イ ノ か タダ テ " ノ / 4 シャ ロニ ュ リ 一 ー 
110 A=1 。23456 iD=2:G0SUB 140:GOSUB 170O 

120 A=1 、23456』:D=3:GOUSUB 140:GOSUB 170 

130 END 

140 IF A=INT(A) THEN AD=A:RETURN 

150 AD=CINTC(AX10^D+、5)/10"D 

160 RETURN 

170 PRINT A,AD 

180 RETURN 





PT 


1 .2Z3456 1 , 23 
1 、23436 1 ,23 っ 
Uk 
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INJ[N| 特殊 ステ ー ト メン ト 


変数 の 初期 化 お よび メ モリ 領域 の 設定 を し ます 。 
CLEAR(< ス トリ ング 領域 の 大 き さ >[, く メモリ の 上 限 >]]〕 
CLEAR 1000, &HDFFF 


・ すべ て の 数 値 変数 を 0 に , 文字 変数 を “(ヌル スト リン 
グ ) に 初期 化し ます 。 

・ < スト リン グ 領 域 の 大 き さ > は BASIC が 文字 列 を 処理 す 
る だ た め に 用 いる メモ リ 閥 域 の 大 き さ を バイ ト 数 で 指定 し ま 
す 。 多く の 文 字 列 演算 を 行っ た り 大 き な 文 字 配 列 を 用 いる 場 
合 に は , この 儲 域 を 大 きく 指定 し な いと “Out of string 
space" エ ラー が 起り ます 。 リ セッ ト 後 の 初期 化 さ れ た 状態 で 
は , この 領域 は 300 に 初期 設定 され ます 。 

・ <〈 メ モリ の 上 限 > は BASIC が 使用 する メモ リ の 上 限 番地 
を 指定 し ます 。 そ の 番地 以後 に 置か れ た デー タ や 機械 語 プ ロ 
グラ ム は , BASIC に よっ て 破壊 され る こと は あり ませ ん 。 

・ CLEAR は DEF (DEFFN, DEFUSR, DEFINT な ど ) に よっ て 
定義 6 る い は 指定 され た 情報 も すべ て 無効 に し ます 。 








100 
110 
1 Z0 
1 30 
140 
130 
160 
170 
180 
120 
Z00 
Z10 
2Z0 
2Z30 


/Z40 END 

250 

260 “- 一 DUMP -- 

270 PRINT " ョ a を = AZ。D!= ニ "5B。 本" し 揚 


Z80 
Z20 
300 
310 


ーーー valuable clear - 一 
DEF FNX(X )=X“ フォ X+5 

A シ =213 

B= ア 4 。 543 

じ 提 ニア 6346 .43263654302 栖 
D ま = ABCDEFG 


GOSUB 270:"-- DUMP -- 
CLEAR 
GOSUB 270:"-- DUMP -- 


PRINT “"a ま =" :CHR も (&H22 ) iD も :CHR ま ( &H22 ) 


PRINT "eae(x)="」 
FOR 1I=0 TO 10 
PRINT E(!)* 
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320 NEXT 1:PRINT ーー 
330 PRINT "FNX(X)=" ぉ FNX(10 ) 
340 PRINT :PRINT 

350 RETURN 


P Hf 

a を = 213 b!= 74.7543 。C#= 76346.43263654302 
a$='ABCDEFG 

e( x)= 0 1 2 3 4 5 6 7 8 9 10 
FNX(X)= 115 

ョ を = 0 b!= 0 C#= 0 


e( x)= 0 0 0 0 0 0 0O 0O 0 0 0 


Uk 
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CLOAD [MMJIN| 入出 力 コマ ンド 








カセ ッ ト テ ー プ か ら メ モリ へ ヘ プログ ラム を ロー ド し ます 。 


CLOAD< フ ァイル 名 > 


CLOAD “DEMO” 


・ CLOAD は , カセ ッ ト テ ー プ ブ か ら 指 定 し た < ファ イル 名 〉 
の プロ グラ ム を メモ リ ヘ ロー ド す る 命令 で す 。 
* 。〈 フ ァイル 名 > は 6 文字 以内 で 指定 し て くだ さ い )。 
* CLOAD コマ ンド の 後 ,。 カセ ッ ト テ ー プ か ら 指 定 し た 
〈 く ファ イル 名 > を 見 つけ る と 

Found : < ファ イル 名 > 
と 表示 され , ブロ グラ ム を ロー ド し ます 。 そ の と き 画 面 右上 
に アス タリ スク (*) が 点滅 し ます 。 
・ も し 指定 し た く フ ァイル 名 > と 異 っ た く フ ァイル 名 〉 を 見 つ 
ける と 

Skip : < ファ イル 名 > 
と 表示 し て , 目的 の < ファ イル 名 〉 を 探し 続け ます 。 
・ ブフ ログ ラム を ロー ド す る の に 成功 すれ ば 画面 に “Ok" と 
表示 し , 失敗 すれ ば “Tape read ERROR" と 表示 し て か ら コ マ 
ンド レベ ル に 戻り ます 。 


PC-6001MKT エ TI ユー ザー ズ マ ニュ アル ,。 CSAVE 


cload "baka *" 
Skipsic1ock 
Foundi baka 
Uk 


CLOAD? 











入出 力 コ マン ド 


メモ リ 上 の プロ グラ ム と テー プ 上 の プロ グラ ム と の 比較 を し 
ます 。 

CLOAD2< フ ァイル 名 > 

CLOAD2“DEMO” 


・ 。CLOAD? は 現在 メモ リ 上 に ある ブロ グラ ム と <〈 フ ァイル 
名 〉 で 指定 され た テー ブ プ 上 の プロ グラ ム を 比較 (ベリ ファ イ ) 
し , すべ て の 内 容 が 等 し けれ ば “Ok" と 表示 し , そう で な け 
れ ば “Bad" と 表示 し て か ら コ マン ドレ ベル に 戻り ます 。 

。 CLOAD? は メモ リ 上 の プロ グラ ム が ミス な く テ ー ブ 上 に 
セー ブ さ れ て いる か を 確認 する た め の も の で あり 通常 は 
CSAVE に 引き 続い て 実行 し ます 。 こ の 場合 プログ ラム を 実 
行 す る 前 に CLOAD? を 行い ます 。 

CLOAD? は CSAVE の 直後 に 行っ て くだ さい 。CSAVE の あと 
1 度 プ ログ ラム を 実行 する と CLOAD? で ブ プログ ラム の 比較 
を 行っ て も 等 し く な ら な いこ と が あり ます 。 


PC-8001 MKI ユ ー ザ ー ズ マニ ュ ア ル 。 CLOAD, CSAVE 


cload? "umo 
F oOund : umO 


0k 
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回 II 入出 力 ス テー トメ ント 


ファ イル を 閉じ ます 。 
CLOSE [[ せ ] く < ファ イル 番号 >[,[ 韻 ] < ファ イル 番号 >]…]〕 
CLOSE 


・ <〈 フ ァイル 番号 > に 対応 する ファ イル を 閉じ ます 。 以後 . 

CLOSE に よっ て 指定 され た 〈 フ ァイル 番号 〉 は , 異な る ファ 
イル を 開く だ ため に 再び 利用 する こと が で きま す 。 ま た , 閉じ 
られ だ ファ イル は , 同じ ある い は 異な っ た ファ イル 番号 に 
よっ て 再び 開く こと が で きま す 。 

・ CLOSE で は , 〈 フ ァイル 番号 > を 複数 指定 する こと に よ 
り 一 度 に 複数 の ファ イル を 閉じ る こと が で きま す 。<〈 フ ァ イ 
ル 番 号 〉 が 省略 され た 場合 に は , その と き 開 いて いる ファ イ 
ル を すべ て 閉じ ます 。 

・ 閑 じ て い る ファ イル に 対し て , デー タ の 入出 力 を 行う こと 
は で きま せん 。 

・ ファ イル が 出力 用 に オー プン され て いた 場合 に は 。 必ず 
CLOSE を 実行 し な けれ ば な り ま せん 。 

・ END, NEW を 実行 する と 自動 的 に すべ て の ファ イル を 閉 
じ ま す 。STOP は ファ イル を 閉じ る 作業 は 行い ませ ん の で 注 
二 じ し で くだ きい 。 


N so DISK-BASIC に お いて , ファ イル を 開い た まま フロ ッ 
ビィ イィ ディスク を と り 出 す と , フロ ッ ピ ィ デ ィ ス ク の 配置 表 
(FAT) を こわ す お それ が あり ます 。 したがって, ファ イル を 
オー ブン し た 場合 , 必ず CLOSE で すべ て の ファ イル を 閉じ 
プター ルオ ディ ォ オス メグ を と り 有 し て くだ きい 。 
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100 
110 
1 20 
1 30 
140 
1 っ 0 


OPEN "tes も t1 FOUR OUTPUT AS 昔 1 
DPEN "test2” FOUR OUTPUT AG #2 
PRINT ##1。" 千 ile data 1" 

CLOSE 草 1 

PRINT 2。 和 file data 2" 

CLOSFE 苦 2 


ティ スク 


CMD BLOAD [sllNu 入出 力 コ マン ド 


機械 語 プ ログ ラム を ロー ド し ます 。 
CMD BLOAD< フ ァイル 名 >[, く ロー ドア ドレ ス >][, R) 
CMD BLOAD “DEMO. bin” .R 


計 ] [ 噌 | 薄 
き | ll 





* 〈 フ ァイル 名 > に よっ て 指定 され た , フロ ッ ピ ィ デ ィ ス ク 
上 の 機械 語 プ ログ ラム フ ァイル を メモ リ に ロー ド し ます 。 な た 
だ し , 機械 語 プ ログ ラム ファ イル は CMD BSAVE で 作成 され 
だ も の で な けれ ば な り ま せん 。 

・ バロー ドア ドレ ス >〉 が 省略 され た 場合 , CMD BSAVE に よ 
り フ ァイル を セー ブ す る 際 に 指定 し た も の と 同じ に な り ま 
す 。 ま だ ,〈 ロ ー ド アド レス > が 指定 され る と その 番地 か ら ロ ー 
ド し 始め ます 。 こ の と き , セー ブ さ れ た 番地 と 異な る 番地 に 
ロー ド さ れ て も , 実行 可能 (リロ ケー タブ ル ) に な っ て いな け 
れ ば な り ま せん 。 

・ R オ フシ ョ ン を 指定 する と , プロ グラ ム を ロー ド 後 . セー 
ブ の 際 に 指定 され た 開始 番地 か ら , プロ グラ ム の 実行 を 直 ち 
に 開始 し ます 。 こ の 時 , 既に 開か れ て いる ファ イル は その 状 
馬 を 保持 し ます 。 く < ロー ドア ドレ ス >〉 が 指定 され て いる 場合 は 。 
突 行 開始 番地 も く < ロー ドア ドレ ス 〉 の 番地 に な り ま す 。 

カセ ッ ト テ ー フ を 対象 と し た CMD BLOAD 命 欠 は, 実行 で 
きま せん 。 








CMD BSAVE 





し プロ グラ ムッ un 
cmd bload "MOOUSEBIN" 
Uk 


cmd bload"PANNELBIN" ,&h2000 
Ok 


CMD BSAVE [ll 入出 力 コ マン ド 














機械 語 プ ログ ラム を セー ブ し ます 。 
CMD BSAVE< フ ァイル 名 >。 < セー フ プア ドレ ス >, < 長 さ > 
CMD BSAVE “DEMO. BIN", HE000, &H40 


*。 メモ リ 上 に 置か れ て いる 機械 語 ブ ログ ラム を , 指定 され 
た だ く < く ファ イル 名 > で フロ ッ ピ ィ デ ヂ ディスク へ ヘ へ セー ブ し ます 。 

・ < セー ブ ア ド レス > で 指定 され た 番地 か ら , < 長 さ > バイ 
ト の 内 容 が , 機械 語 プ ログ ラム と し て セー ブ さ れ ま す 。 

・ < セー ブ ア ド レス > を 実行 開始 番地 と し て お く と CMD 
LOAD に より , 機械 語 プ ログ ラム の ロー ド ( と 実行 ) が 行え ま 
す 。 


カセ ッ ト テ ー プ を 対象 と し た CMD BSAVE は , 実行 で きま せ 
の 


CMD BLOAD 


cmd bsave MOUUSEBIN' 。&hb600 ,&h3f 
Uk 


2ー ク 1 


CMD CIRCLE グラ フィ ックス テー トメ ント 





婦 





例 


円 ( 柄 円 ) を 描き ます 。 
CMD CIRCLE (Hx。 y)、 
Mi 





, < 半径 > [(, < カ ラー ナン パ 〉」〕 
TEP(x, y ( 


し , 〈 開 始 角度 > ] 〔, < 終了 角度 > ] [, < 比率 > 〕 
CMD CIRCLE (90, 90), 40, 1 


・ ビ ピュー 座標 の (HxHy) を 中 心 と し , < 半径 > で 指定 され る 
大 き さ の 円 を 描き ます 。 

・ <〈 半 符 > は , 1 ビク セル を 単位 と し た と き の 長 さ で す 。 ま 
た , < 半 符 > が 負 で あっ た 場合 は , その 絶対 値 を と り ま す 。 

* <〈 カ ラー ナン パパ > を 指定 する と , 指定 され た だ カラー ナンバ 
の 色 で 円 を 描き ます 。 省略 され た 場合 , CMD COLOR で 指定 
され て いる フォ アグ ラウ ンド カラ ー ナ ン バ で 円 を 描き ます 。 

・ CMD CIRCLE は 通常 円 描き ます が , < 開始 角度 ?, < 終 
了 角 度 > を 指定 する と 指定 され た 角度 の 範囲 内 の み に 円 弧 を 
折 き ます 。 但 し, 角度 は , 真 円 を 基準 と し た と き の 値 で す 。 
し た が っ て 椿 円 で 円 弧 を 描く 場合 , 注意 が 必要 で す 。 

・ また , < 開始 角度 >, < 終了 角度 > が 負 で あっ た 場合 , その 
絶対 値 を と り , 正 に し た 角度 が 用 いら れ ま す 。 そ の と き 中 心 
か ら 半 径 が 描か れ , < 開始 角 度 >, < 終了 角度 > 共に 負 で あっ た 
場合 , 扇形 を 描く こと が で きま す 。 

・ (開始 角度 >, < 終了 角度 >? は, 一 2 から 十 2 ァ の 範囲 内 
に な いと “Illegal function call" エラ ー が 起こ り ま す 。 


xr 王 3.14159 











率 > は , (垂直 方 向 の 半径 )/( 水 平方 向 の 半径 ) で 指定 

し ます 。 く < 比率 > が 省略 され た 場合 に は , 640 メ 200 ビ クセ ル の 
モー ド で は 0.5, 320X200 ビ クセ ル の モー ド で は 1.0 が 採用 さ 
れ ま す 。 

・ 320X200 ピ クセ ル の モー ド で 1 未満 の < 比率 > を 指定 し た 
と き , < 半径 > は 水平 方 向 の 半径 が 基準 に な り ま す 。 ま た , 1 
以上 の < 比率 > を 指定 し た と き に は , 垂直 方 向 の 半径 が 基準 と 
な り ま す 。 

・ 640X200 ビ クセ ル の モー ド で 1 未満 の < 比率 > を 指定 し た 
と き , 320X200 ピ クセ ル の モー ド と 同様 に < 半径 > は 水平 方 向 
の 半径 が 基準 に な り ま す 。 ま た 1 以上 の < 比率 > を 指定 し た と 
き 。 く 比率 > が 1 の と き の 算 直方 向 の < 半径 > が 基準 に な り ま す 。 
・ 中 心 座標 (HxiHyy は ビュ ー ポ ー ト の 外 に 指定 する こと が 
で きま す 。 し か し , 極端 に 大 き な 円 の 一 部 (円 弧 ) を 表示 させ 
電 合 , 動作 は 保障 され ませ ん 。 



























100 CMD SCRKEEN 2,0 

110 CMD CULOR 3,0 

120 CMD CLS 3 

130 FUR =0 1「0 100 

140 CMUD CIRCLE(TX3,SIN(T/639)%20x1T),COUS( T )※60 





CMD CLS 画面 制御 ステ ー ト メン ト 


画面 を クリ ア し ます 。 
%) CMD CLS〔 く < 機能 >〕 
(文例 ) CMDCLS3 








・ < 機能 > は 1, 2, 3 の 値 を と り , それ ぞ れ 次 の よう に 働 
きま す 。 省略 され た と き は 1 が 選択 され ます 。 
1: テキ スト 画面 を クリ ア し ます 。 キー の 入力 , 
PRINT CHKS(12) : の 実行 と 全く 同 七 動作 を し ま 
す 。 
2: ビ ピュー ボー ト 内 の グラ フィ ッ ク 画 面 を CMD COLOR 
で 指定 され た パッ ク グ ラウ ンド カラ ー ナ ン バ で クリ 
ア し ます 。 
3 テキ スト 画面 と グラ フィ ッ ク 画 面 の 両方 を クリ ア し 
まま の 。 
*。 グフ フィ ッ ク 画 面 を クリ ア し た と き LP(Last referenced 
point) は ビュ ー ポ ー ト の 左上 の 頂点 に 移動 し ます 。 ま た テキ 
スト 画面 を クリ ア し た 場合 カー ソル は ホー ム ポ ジ シ ョ ン ( 画 
面 の 左上 ) に 移動 し ます 。 





CMD SCREEN, CMD COLOKR, CMD VIEW, COLOR 





10 CMD SCREEN 2 

20 CMD CLS3 

30 FUR Y=O0 TO 9%9 

40 XX=YX16/5 

っ 0 CMD VIEU (X。Y)-(319-X 。 199-Y ) 


100 FOR MM=3 TO 2 STEP -1 
110 CMD SCRKEEN M。,RND( 1 ) x8 
12Z0 NEXT 

130 NEXT 

140 CMD COLOR ,0 

1 つ 0 END 





CMD COLOR クラ フィ ックス テー トメ ント 


機 


能 





グラ フィ ッ ク 画 面 の フォ アグ ラウ ンド カラ ー, バッ ク ク ラ ワウ ワ 

ン ドカ ラー を 指定 し ます 。 

CMD COLOR [< フォ アグ ラウ ンド カラ ー ナ ン バ パ >」 し ,、 く バッ ク グ 
ラウ ンド カラ ー ナ ン バ パ >]〕 

CMD COLOR 1.0 


。 グラ フィ ッ ク 画 面 の フォ アグ ラウ ンド , バッ ク グ ラウ ン 
ド の 色 を カラ ー ナ ン バ で 指定 し ます 。 

* < フォ アグ ラウ ンド カラ ー ナ ン ノ や と は グラフィック 画面 に 点 
や 線 を 表示 する と き に 使わ れる 色 の こと で す 。N so -BASIC の 
種々 の 高 解像度 グラ フィ ッ ク 命 令 (CMD PSET, CMD LINE 
CMD CIRCLE な ど ) で < カラ ー ナ ン 2 や の 指定 を し な か っ た 場 
合 , こ の フォ アグ ラウ ンド カラ ー ナ ン バ の 色 が 採用 され ます 。 

。 (ベック グラ ウン ドカ ラー ナン ノッ や と は , グラ フィ ッ ク 画 面 
の 地 の 色 の こと で , CMD COLOR 実 行 後 。 CMD CLS に よっ 
て グラ フィ ッ ク 画 面 を クリ ア す る と ,。 指定 し た カラ ー ナ ン バ パ 
の 色 に よっ て 画面 が 塗り 変え られ ます 。 ま た , CMD PRESET 
を <〈 カ ラー ナン パパ >〉 の 指定 な し で 実行 する と , < バッ ク グ クラ ウン 
ドカ ラー ナン ババ > の 色 が 採用 され ます 。 

・ 次 に カラ ー ナ ン バ と 色 の 関 作 を 示し ます 。 








・ 選択 色 と は CMD SCREEN で 指定 する < 選択 色 の カラ ー 
コー ド > の こと で , ( ) の 色 は CMD SCREEN で < 選択 色 の 
カラ ー コ ー ド > が 省略 され た と き の も の で す 。 これ ら の 指定 
の し か た は CMD SCREEN を 参照 し て くだ さい 。 

> < カカ ラー ナンバ 〉> は モノ クロ モー ド , アト リ ビ ピュー トカ 
ラー モー ド の と き は 0 ある い は 1 を 指定 し ます が , 0 以外 の 
数 値 が 指定 され る と すべ て 1 と みな し ます 。 ま た , 4 色 カ ラー 
モー ド 0, 1 の と き 0 一 4 まで の 値 を 指定 し ます が , その 範 
囲 外 の 数 値 は 4 で 割っ た あま り が 採用 され ます 。 


100 “ CMD COLOR 

110 MIDTH 40,25 

120 FOR S=2 TO 3 

130 CMD SCREEN S,0 

140 FOR Ii=O TO 3 

150 FOR J=O TO 3 

160 CMD COLOR 1!,J 

170 CMD CLS 3 

180 LOCATE 11,12 

190 PRINT "cmd 。 color' iTi"。":J 
200 CMD CIRCLE( 150 。 100 ) , 70 
210 NEXT J 

220 NEXT 1 

230 NEXT S 

240 END 


CMD COLOR @ 画面 制御 ステ ー ト メン ト 


テキ スト 画面 に 書か れ た 文字 な ど に 色 を 設定 し ます 。 
CMD COLOR@ (X1。 Y1) 一 (X2, Y2 7) 
CMD COLOR@ (0, 0) 一 (40, 19), 3 





・ テキ スト 画面 の キャ ラク クタ 座標 の 2 点 ( 信 1 Yi),(X2, Y5) 
を 対 角 と する 四角 形 の 領域 に 書か れ て いる , 文字 や グラ フィ ッ 
クキ ャ ラク タ に 色 を 付け ます 。 ま た , CMD SCREEN で 〈 ク グラ 
フィ ッ ク エ モー ド 〉 が 1 (640X200 ビ クセ ル , アト リピ ュー トカ 
ラー モー ド ) の と き フ ォ ア グラ ウン ドカ ラー に 人 色 を 設定 する 
こと が で きま す 。 た だ し , この と き の CONSOLE の 〈 カ ラー 
ン 白 黒 ス イッ チ 〉 は 1 (カラ ー モ ー ド ) で な けれ ば な り ま せん 。 
・ キャ ラク タ 座 標 の 範囲 は 次 の よう に な り ま す 。 


XX ゥ 2 0 一 (<〈 桁 数 > 一 1 ) 

Y」.Y。 テ 0 一 (〈 桁 数 > 一 1 ) 
。 な お ., < 桁 数 >。 < 行 数 〉 は 現在 WIDTH 文 で 指定 され る 値 
DI ま の 


CONSOLE で (カラ ー モ ー ド ) を 指定 する と , テキ スト 画面 は 
グラ フィ ックス 画面 の 左右 の 両端 に 重 な ら な い の で , グラ 
フィ ックス 画面 の 全 領 域 に 色 を つけ る こと は で きま せん 。 
CMD COLOR@ に よっ て 設定 され た 領域 の 上 に 新しく 文字 な 
ど を 書い た 場合 , 書か れ た 文字 は この 命令 の 影響 を 受け ませ 
ん 。 また, 低 解像度 グラ フィ ッ ク で 描か れ て いる 画面 に 
CMD COLOR@ を 実行 する と 画面 が 乱れ ます 。 





PC-8001MKI ユ ー ザ ー ズ マニ ュ ア ル 





100 MIiDTH 80,25:CONSOLE 0,25.0,1 
110 CMD CLS 3 
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120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
2e0 
270 
280 
290 


CMD SCREEN 1。,.0:CL=O 
FOUR J=0 「O 20 STEP 5 
FUR TiT=0 TO 72 STEP 6 
CMD COLOR@( エコ J)-( エ +6。J+4 ) 。CL 
し し = し L+1: IF CL=8 THEN CL=0 
NEXT I 


NEXT J 
FUR =0 TO 639 STEP 2 
NEXT 1 1 
FUR I=0 TO 8 
IF IT=4 THEN 2Z0 
CMU SCREEN 1 。,1i 
FUR J=1 TO 1000:NEXT J 
NEXT 」 
IF INKEY$=”” THEN 280 
CMD SCREEN 0,,7:CMD CLS 3 
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CMD COPY 





入出 力 ス テー トメ ント 


画面 に 表示 され て いる 文字 , 図形 を プリ ンタ に 出力 し ます 。 
CMD COPY (< 機能 >〕 
CMD COPY 3 


< 機能 > は 。 1 から 5 まで の 値 を と り , 次 の よう に 働き ま 


す 。 省略 され た と き は , 3 が 選択 され ます 。 


1 ) 





1 : テキ スト 画面 の み を ブリ ンタ に コピ ー し ます 。 

2: グラ フィ ッ ク 画 面 の み を ブリ ンタ に コピ ー し ます 。 

3 : テキ スト 画面 , グラ フィ ッ ク 画 面 の 両方 を プリ ンタ 
に コピ ビー し ます 。 

4 : グラ フィ ッ ク 画 面 の み を ブリ ンタ に コピ ビー し ます 。 
640X200 ビ クセ ル の モー ド で 出力 され た 漢字 (グラ 
フィ ッ ク パ ター ン ) は この モー ド で 出力 する と 縦 方 向 
が 2 分 の 1 に 縮小 され て , 見 や すく な り ま す 。 

5: テキ スト 画面 ,。 グラ フィ ッ ク 画 面 の 両方 を プリ ンタ 
に コピ ビー し ます 。 4 と 同じ よう に 640X200 ビ クセ ル の 
モー ド で 出力 され た パタ ー ン は 縦 方 向 が 2 分 の 1 に 縮 
小さ れ ま す 。 


CMD COPY 文 は PC-8023-C 専 用 で す が , グラ フラ フィック 
画面 の コピ ビー におい て, 画面 に 表示 され だ も の と , プ 
リン タ に コピ ー さ れ だ た も の と で は いく ら か イメ ー ジ が 
異な り ま す 。 また , PC-8821/22 も 使用 する こと が で き 
ます 。 し か し , PC-8023-C と 同じ よう に プリ ンタ の 機 
械 的 な 制約 に より グラ フィ ッ ク 画 面 の コピ ビー は 画面 に 
表示 され て いる も の と プリ ンタ に コピ ー さ れ た だ も の と 
で は 形 が 異な り ま す 。 


2ー2 ツ 





100 
110 
12Z0 
130 
140 
1 っ 0 
160 
170 
180 
120 
Z00 
210 
ZZ0 
Z30 
Z40 
2 っ 0 
260 
ZD 
280 


CMD COPY で は , 低 解 像 度 グ ラフ ィ ッ クス を プ ブリ ンタ 


に コピ ー す る こと は で きま せん 。 


CMD CUPY 

.「His program canno セ 

Fun りり 1 上 hoOu モ PC じ -8023- じ or PC-8021/22 
CMD SCREEN 2,0,1 

CMD じ LS 3 


FUR 【[=1 TO 20 
X=RND( 1 ) x37 
Y=RND( 1 )%17 
LUCATE XX, YiPRINT "MK2" 
CMD CIRCLE((X+1 )*X8,Y%10 ) ,。30 。XxY/4 
NEXT I 
FOUR 【=1 TO 5 
CMD COPY I 
NEXT I 


END 
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CMD GET@ グラ フィ ックス テー トメ ント 








グラ フィ ッ ク 画 面 の グラ フィ ッ ク バ パタ ー ン を 配列 に 読み 込み 
ます 。 


CMD GET[@](Hx1, Hyi) 一 | (Hx 2, Hy 2 ) 
STEP(x,y) | 





,〈 配 列 変数 名 





( く 要 素 ナ ン パ > )] 
CMD GET[@〕 (0, 0) 一 (16, 16), G 多 


。 画面 上 の ビュ ー 座 標 の 2 点 (Hxi, Hyi) と (Hxz, Hy2) を 対 
角 と する 四角 形 の 領域 を , く 配列 変数 名 〉 で 指定 され た 配列 変数 に 
読み 込み ます 。 な お , ビュー 座標 と は , ビュ ー ボ ポー ト 内 に 展 
開 さ れる 座標 系 ( 1 章 ・ デ ィ ス プレ イ 画 面 の 座標 系 を 参照 ) の 
こと で す 。 2 つ 目 の 座標 指定 に は 相対 座標 に よる 指定 が 放さ 
れ て いま す 。 指定 され た 座標 が ビュー ポー ト の 範囲 内 に な 
いよ 表 は 学 ラ プー となり ます 。 

> < 配列 変数 名 〉? は , ユー ザ が グラ フィ ッ ク パ ター ン を 読み 
込む た め に 用 意 する 整数 型 の 配列 変数 の 名 前 で す 。 ま だ た この 
< 要素 ナン バ 〉> は , グラ フィ ッ ク パ ター ン を 配列 変数 に 読み 込 
むと き に , どの 要素 か ら 格 納 し 始め る か の 指定 で す 。 1 つの 
配列 変数 に 対し て 複数 の グラ フィ ッ ク デ ー タ を 格納 する 場合 
に 使う こと が で きま す 。 < 要素 ナン パ 〉 を 省略 し た と き は 配列 
の 最初 か ら 格納 し ます 。 

・ GET@ に 先だって この 配列 変数 に 必要 な 大 き さ を DIM 
で 確保 し な けれ ば な り ま せん 。 こ の 配列 変数 の 大 き さ は , 読 
み 込 む 領 域 の 大 き さ , グラ フィ ッ ク モ ー ド に よっ て 完 な り ま 
す 。 

・ 1 つの 配列 に 1 つの パタ ー ン し か 読み 込ま な い 場 合 は , 
次 の 計算 式 で 求め やあ こと が で きま す 。 複 数 パタ ー ン の 場合 は , 
それ ぞ れ の パタ ー ン に つい て 計算 し , その 分 確保 し な けれ ば 





き 
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な り ま せん 。 
< 必要 な バイ ト 数 > ミ ((<〈 横 の ドッ ト 数 ) ま M 十 人 の 8) 
*※ 〈 終 の ドッ ト 数 > 十 4 


モノ クロ ー モ ー ド , アト リ ビ ュ ー ト カ 
ラー モー ド の と き 
Mー 2 ま B が テー モー ド 0。 1 の よき 


< 添字 の 値 〉 = < 必要 な バイ ト 数 >〉 半 2 


M 三 1 


・ この GET@ 文 は 後述 する PUT@ 文 と 密接 な 関係 に あり . 
通常 ペア で 使用 され ます 。 
・ GET@ 命 令 実 行 後 」 LP は (Hx_Hy.) に 移さ れ ま す 。 


配列 変数 は 整数 型 の 配列 か つ 一 次 元 配列 で な けれ ば な り ま せ 
ん O 








CMD PUT@ 





CMD GET@G , CMD PUT@ 


CMD SCREEN 2.0 
CMD CLS 3 


) XD=40 : YD=40 
|) BYTE=((XDU+7 )\B )%※YUDX3+4 


FACT=BYTE\2+1 


DIM G%(FACT ) 
) CMD GET@ 


CMD LINE(0,0)-STEP( XD-1 , YD-1 ) , 1 .B 
CMU CIRCLE(XD/2ー-1 , YD/2-1 ) , YD/2-5 ,2 
CMU GET(0.0)-STEPK( XD-1 , YD-1 ) , G% 

” CMD PUT@ 

FOR X=0 TO 250 STEP 5S0 


) CMD PUT (X,100 ) ,G を 


NEXT X 
END 


8a ニ ロビ (0 ) 
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CMD INIT 





lellN 特殊 コマ ンド 


フロ ッ ピ イィ イデ イィ スク の イニ シャ ライ ズ を し ます 。 
CMD INIT〔< 機 能 >〕 
CMD INIT 0 


N。。 DISK 一 BASIC を 使用 し て いる 途中 で ウォ ー ム スタ ー 


ト を し た 場合 , その後, フロ ッ ビ ィ デ ィ ス ク ユ ニッ ト の イニ 
シャ ライ ズ を する た だ ため に 用 いま す 。 


(機能 > は 0 か ら 2 まで の 値 を と り , 省略 され た 場合 は 0 


と 解釈 され ます 。 シ ステ ム デ ィ ス ク と ディ スク ユニ ッ ト と の 
組み あわ せ に よっ て 以下 の よう に 使い 分 け な け れ ば な り ま せ 


ん 。 


U 


上 8 


:・ 最 も 一 般 的 な ディ スク ユニ ッ ト の イニ シャ ライ ズ を 行 
いま す 。 シ ステ ム デ ィ ス ク と ディ スク ユニ ッ ト の 関係 が 
次 の よう な 場合 で す 。 
PC-8087 し -8691 
PC-8881(1) 
PC-8037-1W PC-8031-1W 


PC-8031-2W 


PC-8037-2W PC-80S31 


グイ スク ココ テッド る 五 面 モ エー ドイ ニン ャ ラノ イス し 
ます 。 特に < 機能 > を 1 に する 必要 が ある の は , 次 の 組み 
合わ せ の よう に 両面 用 の ディ スク ユニ ッ ト を 片面 モー ド 
で 使用 する 場合 に 限ら ちら れ ま す 。 
PC-8031-2W 

| PC-80S31 

戸 面 用 の ディ スク ユニ ッ ト を , 五 面 用 の シス テム ディ 
スク で 使用 し て いる 場合 は , CMD INIT 1 と CMD INIT 0 
は 同じ 動作 を し ます 。 


PC-8037-1W 
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2: デブ ィ ス ク ユ ニッ ト を 両面 モー ド に イニ シャ ライ ズ し 
ます 。CMD INIT 0 と 同じ 動作 を し ます か ら , 通常 は こ 
の CMD INIT 2 を 使う 必要 は あり ませ ん 。 
・ 両面 用 の ディ スク ユニ ッ ト を 両面 モー ド で 使用 し て いる 
と き に CMD INIT 1 は , 絶対 に 実行 さき せな いで くだ さい 。 実 
行 さ せ た 場 合 は , ディ スク ユニ ッ ト が 片面 モー ド に な っ て し 
まい NsoDISK-BASIC が 正しく 動か な く な り ま す 。 
・ DISK-BASIC の 使用 中 に , ウォ ー ム スタ ー ト を し た 場 
合 CMD INIT に 相当 する 命令 が 用 意 さ きれ て いま せん 。 こ 
の 場合 の フロ ッ ピ ィ デ ィ ス ク ユ ニッ ト の イニ シャ ライ ズ スカ 








法 は 。 PC-8001MKI ユ ー ザ ー ズ マニ ュ ア ル 第 3 章 を ご らん 
くだ さい 。 

Cmd ini H 

0k 

Cmd 1ni も 1 


Uk 
U に k 


2-34 


CMD LINE [Ni グラ フィ ックス テー トメ ント 








指定 され た 2 点 間 に 直 線 を 引き ます 。 


CMD LINE (Hx1, HY 1 ) as ( X 1。 V1) 上 〈 カ ラー 
| | (Hx 2 , Hy 2 ) STEP( x 2. V2) 


ナン バ )) M BF 





CMDLINE(100, 100) 一 (200, 150), 1 B 


*・ 。 ビュー 座標 系 の 2 点 (Hxi, Hyi) (Hxz2, Hy2 ) を 結ぶ 
直線 を 描き ます 。(Hxi, Hyi) が 省略 され た 場合 , LP の 値 
を と り ま す 。STEP を 付け る と 相対 座標 に よる 指定 と な り ま 
す 。( 1 章 ・ 座 標 の 指定 の 仕方 を 参照 ) 

・ 引く < く 線 の 色 は く < カ ラー ナン バ 〉 に より 指定 し , も し これ が 
省略 され た 場合 , 現在 CMD COLOR 文 に よっ て 設定 され て い 
る , グラ フィ ッ ク 画 面 の < フォ アグ ラウ ンド カラ ー ナ ン パ > が 
採用 され ます 。 

・ 次 の パラ メー タ に は , B か BF の どちら か を 指定 する こ 
と が で きま す 。B は Box の 意味 で ,(Hxi, Hyi) と (Hxz, Hyz2) 


の 2 点 を 対 角 と する 長方形 を 描き , BF は Box Fil の 意味 で 
その 長方形 を 塗り つ 人 なし ます 。 


100 CMD SCKEEN 2.0, 1 

110 CMD COLOUR 2.0 

120 CMD CLS 3 

140 X1= ニ KNU( 1 )※3195Y1=RKND( 1 )%199 
1 つ 0 メ ノ =RNU( 1 )※31 ワ 2:Y2=RND( 1 )※199 
160 し L=RNDU( 1 )※ コ +1 

170 MD=INT(RKND( 1 )※2+1 ) 

180 UN MD GUTO 120,200 

120 CMUD LINE(X1.Y1)-(X2。Y2),CL GUTO 260 
Z00 CMD LINEK(X1。Y1 う (XY2)。CL,B 
260 TIF INKEY ま =”” THEN 140 

Z70 END 
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CMD PAINT グラ フィ ックス テー トメ ント 








注 意 





邊 定 さ れ た 境界 色 で 囲ま れ た 領域 を , 指 定 さ れ た 色 で 塗り ます 。 


PAINT | (Hx, Hy) 本 看 s 眼 負う) 
| sreP P(x | し < 領域 色 〉 し < 境界 色 >J」 


PAINT(50, 50), 0O, 1 


。 (Hx, Hy) で 塗り 始め る ビュ ー 座 標 を 指定 し ます 。 

・ < 境界 色 > で 囲ま れ た 領域 を , 指定 され た < 領域 色 > で 塗り 

つぶ し ます 。STEP を 付け る と 相対 座標 となり ます (1 

座標 の 指定 の 仕方 参照 )。 

・ < 領域 色 >〉, < 境界 色 > は と も に カラ ー ナ ン バ で 指定 を 行い 
。 < 領域 色 〉 が 省略 され た 場合 , 現在 の CMD COLOR で 指 

0 

< 境界 色 > が 省略 され た 場合 は , < 領域 色 > の 指定 と 同じ カラ 

ー ナ ン バ が < 境界 色 > と し て 用 いら れ ま す 。 

* (Hx,Hy) で 指定 され た 座標 が , 既に 指定 され た 境界 色 

と 同じ 色 で あっ た 場合 に は , CMD PAINT は 何 の 画面 操作 も 

行い ませ ん 。 

・ ビュ ー ポ ー ト の 境界 は CMD PAINT 動作 の 境界 と みな さ 

れ ま す 。 ま た , (Hx,Hy) が ビュ ー ポ ー ト の 範 囲 外 に 指定 さき 

れ て も エラ ー は 起 ら ず 何 の 動作 も し ませ ん 。 


複雑 な 図形 を PAINT する と き , “Out of memory" エ ラー が 起 
きる こと が あり ます 。 


CMD COLOR, CMD VIEW 


100 “CMD PAINT 

110 CMD SCRKEEN Z。0,1 

120 CMD CLS 3 

130 X=INT(RKNDC 1 )%※312):Y= ニ INT(RKND( 1 )※1 ウ ウラ ) 
140 RK=RND( 1 )※G0 : じ =RNDU( 1 )※ さ +1 

150 CMD CIRKCLE (XY) JR,C 
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160 CMD PAINT (X,Y),C 
170 GOTO 130 


ロキ トト エ ュ ーー トキ で 
HPFHFTIhPfPlHHTEHETTPTTT 





EEETHEHEEHEEH 央 [HHHHLTEIIPEEES3IEEE 
本 =emr mr 本 cum ココ ニ ュー トモ ニュ 











hr ph 
ーー ナー トト エー エエ エキ エエ トト 本 キキ キュー コキュ 
オ テ ュ ー ト レレ キ ー ヒ レレ ヒト ーー ビレ ヒレ ビー ョ ーー 


エー エー エト mm キョ で ョ ー ョ ュー ト ea 呈 Fa ュ 
TP 
HIRHT 折 志 区 EEEWELE 
トト キュ ニュート トト モト ュ ュー ト トト エ ュ ュー ト エー 
mm mm 


エイ トト エエ Fr ram 
キーー ド コメ ーー コー ミキ エエ ー ョ iLFF デ TIInmr EhHkrWH 


人 
キュ ーー ューーー エ ーー ニー エエ ー=ー ュ ーー トーー ーー ヒエ トロ ーー 
PHHaHTrgdiEtrnimhrrramnbrrnurrres HLLEEHHIHHH ば * 

1 PHIL は THHHHTHLEH 











に に 
ロコ 





で キキ キキ トト ロキ キキ トト せ オ * 
ュ エ ーーーー ネ エエ ピー エロ ー レ ヒュ ュ ョ ィ 
エキ トニ ニー ー ト エコーp Far ロロ Fa=EE は ヨー に ュー に ここ コー 








昌 本 に ュ ュ ニニ ュー ニ ューー ーー セコ イー で imim 還 ロ 古 






FEHHTHHHTEH よ に = キイ エミ コー ニ モ ュー キト 
トト トニ ニュ コニー= = ーーー ーー 






= ョ ニュ ーー キキ キー ニ ト 5 ユキ キュ ュ コトー 
トト Fe キ 





革 本 本 時 ニー トコ ュー キー キー ニー 


ト ョ ーm PT 
すす 1 








CMD POINT グラ フィ ックス テー トメ ント 


Last Referenced Point (LP) を 変更 し ます 。 


CMD POINT | (Hx,HYy) 
STEP(x, y) | 


CMD POINT (10, 30) 


叶 ] [ 
間 ) 民 


叶 
補 


。 Nso-BASIC は ,。 常に 最後 の 高 解像度 グラ フィ ッ ク 操 作 
の 行わ れ た 座標 を 覚え て いま す 。 こ の 座標 は , 相対 座標 に よ 
り 座 標 指定 を 行う と き の 基 点 と な り ま す 。 

・ CMD POINT で は , その 基点 を ビュ ー 座 標 で 設定 し ます 。 
し た が っ て 次 の 例 1 ) と 2 ) は 同じ 結末 と な り ま す 。 


革 
SE 


1) CMD LINE (40,100) 一 (90,50),1.BF 
2) CMD POINT (40,100) 
CMD LINE 一 STEP (50, 一 50).1,BF 
*。 STEP を つけ る と 相対 座標 に よる 指定 と な り ま す 。( 1 
章 ・ 座 標 の 指定 の 仕方 参照 ) 


STATUS POINT 





サー ン プリ フル レ 100 "CMD POINT 
1 110 CMD _ SCREEN 2。.5kCNMDUD CLS 3 
120 FURK j=U0 FUO 35 
130 CMD PUINT SITEP(8。3) 
1 40 GUSUB 160 
1 コ 0 NEX[ [IiENHD 
160 “triangle 
170 CMDU LINE -SIEP(-S50 。50 ) , 1 
180 CMU LINE -STEP(100.,0)。2 
190 CMD LINE -STEP(-50 。 -50 ) 。 3 
Z00 RETURN 
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CMD PRESET グラ フィ ックス テー トメ ント 





グラフ フィック 画 面 上 の 任意 の ピク セル を リセ ッ ト し ます 。 


CMD PRESET | (Hx, Hy) 
STEP(x, y) 


CMD PRESET (30, 40) 


解説 ) ・ ビュ ー 座 標 の (Hx, Hy) で 指定 され る ピク セル を リエ セッ 
ト し ます 。 い いか えれ ば 、 現 在 CMD COLOR に よっ て 設定 さ 
れ て いる バッ ク グ ラウ ンド カラ ー で 点 を 塗り 変え ます 。 
・ <〈 カ ラー ナン パパ > を 指定 し た 場合 は 。 CMD PSET と 全く 同 
じ に 機能 し , その パレ ッ ト 番 号 の < く カ ラー ナン バ 〉> で ピク セル 
8 トド し ます 
・ 座標 値 に STEP を 付け た 場合 は 相対 座標 に よる 指定 と な 
り ま す ( 1 章 ・ 座 標 の 指定 の 仕方 参照 )。 
・ CMD PRESET の 実行 後 , LP は (HxHy) に 設定 され ます 。 








100 "CMD PRESET 

110 CMD SCREEN 2,0 

120 CMD COLOR 3,0 

130 CMU CLS 2 

140 CMD PAINT (0,.0),3 

150 CMD LINE(0,100 )-(319,100 ) , 1 
160 CMD LINE(S50,0)-(S50,200 ) , 1 
170 CIRCLE 

180 P=3.14159 

120 FOR 「=0 TO 2xP STEP 2xP/100 
200 = つ U0+ う 50XCUS(T):Y=100-50xSIN(T ) 
210 CMUD PRKESET(X,Y) 

ZZ0 X= つ U+40※T 

230 CMUD PRKESET (X,Y) 

2Z40 NEXT T 

2Z50 END 


CMD PSET 








グラ フィ ックス テー トメ ント 


グラ フィ ッ ク 画 面 上 の 任意 の 位置 に ビク セル を セッ ト し ま 


す 。 


CMD PSET 





(Hx,Hy) 


| STEP(x, y) | [。 < カラ ー ナ ング パ >」 


CMD PSET (30, 40), 1 


ビュ ー 座 標 の (Hx, Hy) の 位置 に ビク セル を セッ ト し ます 。 
カラ ー は <〈 カ ラー ナン バ >〉 に よっ て 指定 し , も し 省略 され 


た 場合 は , 現在 の フォ アグ ラウ ンド カラ ー ナ ン バ (CMD 
COLOR 参 照 ) が 用 いら れ ま す 。 


CMD PSET 実行 


後 , LP は (Hx, Hy) に 設定 され ます 。 


CMD COLOR, CMD PRKESET 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
Z00 
Z10 


220 


Z3U 


"CMD PSET 
CMU SCKEEN 2Z。0 
CMD CLS 2 
CMD LINE(0.100)-(319。100 ) , 1 
CMD LINE(S0 0)-( う 0 。 200 ) , 1 
- CIRCLE 
P=3 。 141 コ 2 
FOUR T=0 TO 2XP STEP 2xP/100 
X= う 0+ つ UXCUS(「):Y ミ 100-50XSIN(T) 
CMD PSET(X。Y) 
X=O0+40※T 
CMD PSET (XY) 
NEXT 「 
END 


2-41 





CMD PUT6@ グラ フィ ックス テー トメ ント 





高 解像度 グラ フィ ッ ク パ ター ン や 漢字 を グラ フィ ッ ク 画 面 に 

表示 し ます 。 

1) CMD PUTL@〕) (Hx, Hy), < 配列 変数 名 > 〔(< 有 要素 ナン 
バ > ) ][. < 機能 >][.」 く フ ォ ア グラ ウン ドカ ラ 
ー ナ ン バ >, く < バッ ク グ ラウ ンド カラ ー ナ ン パ >) 

2) CMD PUTL@〕 (Hx, Hy), KANJI(< 漢 字 コ ー ド > し く 機 
能 >] [〔, く フォ アグ ラウ ンド カラ ー ナ ン バ > , 
< バッ ク グ ラウ ンド カラ ー ナ ン バ >J 

1) CMD PUT (100, 100 ), G 欠 , PSET 

2) CMD PUT (0, 0), KANJI (&H3A34 ) 


1)・ CMD GET@ に よっ て 配列 に 読み 込ま れ た 高 解像度 ク 
ラフ ィ ッ ク パ ター ン を グラ フィ ッ ク 画 面 上 の 仕 意 の 位置 に 
表示 し ます 。 

。 座標 (Hx. Hy) は CMD GET@ の 場合 と 同様 , ビュ ー 座 
標 で 指定 し ます 。 ま た この 命令 を 実行 する と LP は (Hx, 
Hy) に 移動 され ます 。 
。 < 配列 変数 名 〉 は 表示 し た い グ ラフ ィ ッ ク パ ター ン が 格 
納 さ れ て いる 配列 名 で あり , < 要素 ナン パ 〉 は 配列 内 の と こ 
か ら デ ー タ を 取り 始め る か の 指定 で す 。<〈 要 素 ナ ン パ >〉 が 省 
略 さ れ た 場合 は 、 配 列 の 最初 か ら 取 り 始 め ま す 。 こ れ ら の 
指定 は , CMD GET@ 命 令 で 使っ た も の と 同じ も の を 指定 
し 志す 。 
。 < 機能 > と は , グラ フィ ッ ク パ ター ン を 画面 に 表示 する 
際 。 いろ いろ な 機能 を 指定 で きる も の で , 次 に 示す も の が 
用 意 さ れ て いま す 。 
PSET 配列 内 の グラ フィ ッ ク パ ター ン を その まま 表 
示し ます 。 
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PRESET 日 叶 モ ー ド の 場合 は 配列 内 の パタ ー ン を リ 
バー ス し て 表示 し ます 。 4 色 カ ラー モー ド の 
場合 は 各 ビ クセ ル の カラ ー ナ ン バ を , 3 一 ( そ 
の ビク セル の カラ ー ナ ン バ ) と し て 表示 し ま 
の 

OR 配列 内 の グラ フィ ッ ク パ ター ン と , 既に ある 
画面 上 の グラ フィ ッ ク パ ター ン を 1 ビッ ト 
(ビク セル ) ご と に OR (論理 和 ) し , その 結果 
を 画面 に 表示 し ます 。 

AND 配列 内 の パタ ー ン と 画面 上 の パタ ー ン を ピク 
セル ここ と に AND (論理 積 ) し , その 結果 を 画 
面 上 に 表示 し ます 。 

XOR 配列 内 の パタ ー ン を ビク セル ご と に XOR ( 排 
他 的 論理 和 ) し , その 結果 を 画面 に 表示 し ま 
す 。 

※ こ れ ら の < 機能 〉 は 画面 モー ド に よっ て 演算 の 対象 が 違い ま 
す 。 モノクロ モー ド , アト リ ビ ュ ー ト カラ ー モ ー ド の 場合 
ビク セル が ある か な いか を 対象 と し , カラ ー モ ー ド の 場合 
カラ ー ナ ン バ を 対象 と し ます 。 も し < 機能 > が 省略 され た 場 
合 は XOR と みな され ます 。 





・ 到 後 の < く フォ アグ クラ ウン ドカ ラー ナン ノレ や ,。 エッ ク グ ラ 
ワン ドカ フー ナン ノン や は , モ ノ ク ロ モード , ア トリ ビュ ー ト カラ 
ー モ ー ド の 時 に 読み 込ん だ パタ ー ン を カラ ー モ ー ド に お いて 
表示 する 時 に の み 有 効 な オプ ショ ン ッ パラ メー タ で す 。 この 2 つ 
の パラ メー タ は 両方 と も 指定 する か , 両方 と も 指定 し な い 
か の ご どちら か し か 許さ れ ま せん 。 

だ 導 プ グズ メゾ ププ ド の み フ プー ナ シィ のり は 玉 メ クロ ロー ば 。 チ 
トリ ビュ ー ト カラ フラー モー ド で 読み 込ん だ 際 に カラ ー ナ ン バ が 





1 に 対し て の 色 指 定 で , これ を 4 色 カ ラー モー ド で 実行 す 
る と 任意 の 色 に 変え る こと が で きま す 。〈 バ バック グラ ウン 
ドカ ラー ナン バ >〉 は 同様 に 黒 で あっ た ピク セル に 対し て 
の 色 指 定 で す 。 こ れ ら は 共に 0 一 3 の カラ ー ナ ン バ に よ 
っ て 指定 し ます 。 
・CMD GET⑨ と CMD PUT@ 命 令 は 上 記し た く フ ォ ア グフ 
ウン ドカ ラー ナン や , く < バッ ク グ ラウ ンド カラ ー ナ ン ろ 2 ツ > を 指 
定 し て モノ クロ モー ド , アト リ ビ ュ ー ト カラ ー モ ー ド で 読み 
込ん だ パタ ー ン を 4 色 カ ラー モー ド で 表示 する 用 途 の 他 は , 
原則 と し て 同一 画面 モー ド で 使用 する よう に し て くだ さい 。 
2)* < 漢字 コー ド > で 指定 され た 漢字 な どの 文字 を 画面 に 表 
示し ます 。 こ れ ら は オプ ショ ン ROM の 中 に 格納 され て い 
ます 。 ユ ー ザ は これ ら の 中 か ら 任 意 の 文字 を < 沿 字 コー ド 〉 
に よっ て 指定 し , 画面 上 に 日 本 語 の 文 草 を 作成 する こと が 
06 (の 
。 ]) の CMD PUT@ で は ユー ザ が CMD GET@ に よっ て 
配列 に 読み 込ん を だ パタ ー ン を 画面 に 表示 し ます が , 漢字 の 
CMD PUT@ で は 配列 内 の デー タ に あたる も の が , あら か 
じ め 用 意 さ きれ て いま す 。 この こと を 除け ば , その 使い 方 及び 
機能 は 1 ) の 場合 と ほ ば 同様 で す 。 た だ し , 漢字 パタ ー ン 
は 原則 と し て 縦 16 ビ クセ ル , 横 16 ビ クセ ル の 大 き さ と 決め 
られ て いま す (8X 8,。 8 X16 の も の も ある 。) ま た 漢字 パ 
クー ン は 日 黒 モ ー ド で CMD GET@ し た 場合 と 同じ 形 で 格 
約 さ れ て いま すか ら , 4 色 カ ラー モー ド 0/ 1 に お いて <〈 フ ォ 
が テ デ ゲ ザ ン ドカ テー アン ゆみ 0 ルッ アグ テレ ンド か ジー 
ナン や > で 指定 し て カラ ー 表 示さ せる こと も 可能 で す 。 
・ 1] つの CMD PUT@ で は 1 つの 漢字 し か 表示 する こ 
の が の まき ませ ん 。 





2-45 


iPRKINT JIS CODE =" jiHEX ま (AD) "日 " 





は 1 
FPP gm 

ュ 時 ーー 
4 
EE に F 


円 


1 
ERP 
昌 





HH 


gi PR 沖 rear 


ELIEL コ 
E 朋 
LE エト ミコ 





et 


PT] 


EE 
TE ::」 


暫 


生還 画 


ip 間 
時 LITEIII 
二村 玩 
EE 1 は 所 


ETELEI 


HH ま ー] 
絹 田 旧 .・ 


ーー 


LLTETTTUETTI 


し 還 
貼 
ーー ト … 


。 上 臣 」 半生 四 四 

し エコ コ FTT 1 革 是 中 
LLE Ei 

EE LILEI 


し LL エ | し 同 


エエ LT 


に 3 |] 


LFELLI 
還 LEI 」 寺 L 


Si LE 上 NIME 


TLTTTTT1 
FET LT 


間 


EE 


門 Ti 
uu H 
LIN LEE II 
Ln 
人 自 昌 四 目 目 中 四半 本 申 中 
本 中 
L」 
LE E II 
1 LEL 
亜 画 目 ca 
の 
LIL LIL 


軒 ト 。 


ak 


FT PEET すす で | 


LT 


LE 上 EE Sh 


LE Ei 
き 
重 


L』 TEE 


La 
1 し 上 5 


し エコ 
asE | ョ 
1 


1 0 





還 
提 
LE EL J | 

電 』 LE ミコ 


し セト EL 


間 F 計 上 
| 


し 較 昌 』 
LE ュ J II 


円 
H 
"キト 
FT | 
Fn 
LT EL.I3 
キ LS_ LIN I 
人 中 
Pi FI 


* 
LN " ま 


mi 
和 








[に 
1 1 


し すす 上 1 


ET 
昌 1 LT 
1 ま 


中 「 宮 









LT 
= # に 
門 
記 生 
1 本 
年 『 」 LL LE 』 
LE 1 に 敵 FT TH 
に 1 1] 
ュ 
m TTT 
円 門 a 
中 [3 
全 
FT 
円 
H 
] 『 
較 還 1 
PP H 
|! 
H ョ 


証 FT 
古語 。 ます ・ 
PE | 証 

PE 
EET ELSEH] 1] 


1 


5 『 MD 
揚 遇 計 コ iL 


FET 


ドコ 邊 
0 『 
[PT TTF ITT キャ キャ ャ | 


FT- 


や EL is に 上 よ 


LLEEIE] 


ーー ビー 
し | 





Eu | 


# 則 


PP 
*# 
SI FT 1 


LHS コ 


kk 


上 | 雑 
由 有 上 LT 


aa 


LELLEIEERLLEEE SI 


本 上 J 」 
1 計 


馬 ! 
時 


HLTTHHTHTLFTEI 


呈 軍 
|] 還 画 画 
PL 上 1 


PET TLENTTTILI 


本 HLH | 
本 | 


し LE 1 還 
CELL 1 ロ 


ETTTJIIITTtTI 
由 
「L 
1 半 TF Th 
FT 
l 前 





Ph 


ます 1 


1 
っ G TE さす 中 月 - に ーー ーー に (上 エッ 
つ CMA コウ EE 人 人 Tj 1 本 量り T 
QN ご HEE EES 古田 尺 本 語 因 g 
呈 n 了 ロ " 上 昌 pe に に 
ーー TI 。 ぃ い の 
Ll トー 宮 Ll ド oe 1 は の 
ヒー の と ES REF TFT HE は 十 十 。 革 
いび} ュ 
Q つ 四 EE 上 | 慎 晶 問 丘 CN 
QNO テ 工 に NN 間 還 還 DEE 還 SU 還 記 放 
SE ( 
“ DEBNSI2eUO es RE は 
Q _-O ン L EE に トド TK EE 提 還 | 年 o 
' CM』 て } ト - トー *d ' 1 ) RSS 1 PRTR TTF 間 還 TCRP 生 半 ま TTY い 」 四 
と 、 トー - つ + いざ) い ) 2 間 HE 間 隊 ceoeheetr TI 電 
L」 C ア ( つ 〔 CJ ロ _ コ つう | "" ュ 日 RM : 直 は = 中 日 計 邊 に | 
LJ (つぐ ( 〇 つ ( で N 昌 式 >\0 工 〇 HH 出 出 間組 拓 三 表 u 還 
〇 つの つの の HL < ロビ (つつ 寺門 ー 式 ae に ョ ー 上 間 の 0 瞳 業 和議 了 
(7J (し) 加 画 し) っ ー ヒア し う < 工 っ て 1 (ココ ヒコ Qi 商 ec 芽 | 全 有り ます ー MM ト 識 間 
6 。 で OO テー さて で の る PRE FNK。 IT に MS ier[I 1 5 
C コ O 日 口 G ピ し デ 均 ロロ HH ト F- 品 ョ は RI に 
デ テ ロロ を - (うつ 〇 Ll を の ロレ ロロ デ 前 トト は 出 it で や 
〇 (つい (コロ 逐 ロ の 違 ロ FT す HH | 『 由 IN E 
| ' リ 
O つ crHC 人 (DSSIHO に の ひので OO の 喜 の の HPS2 菩 Sel Ha す 11 よ 中 UMEERE 
erdcrdsdsavdedvudvdsdCNCNCNCCNI ら EE 主導 時 提 












CMD SCREEN 画面 制御 ステ ー ト メン ト 






機 能 


グラ フィ ッ ク 画 面 に 対し て 種々 の モー ド 設 定 を する 。 

CMD SCREEN[< く グラ フィ ッ ク モ ー ド >][, く グラ フィ ックス 
ィ ッ チ >][,< 選 択 色 の カラ ー コ ー ド >〕 

CMD SCREEN 2'0' 3 


。 < グラ フィ ッ ク モ ー ド > は, カラー, モノクロ, 分 解 能 と , 
グラ フィ ッ ク 画 面 の 最も 基本 的 な モー ド を 設定 する も の で 人 學 
の 値 を と り ま す 。 

0 一 モノ クロ モー ド (640X200 ピ クセ ル ) 

1 一 アト リ ビ ュ ー ト カラ ー モ ー ド (640X200 ヒビ クセ 

ル ) | 

2 一 4 色 カ ラー モー ド 0 (320X200 ビク セル ) 

3 一 4 色 カ ラー モー ド 1 (320X200 ビク セル ) 
・ < グラ フィ ックス イッ チ > を 0 以外 の 数 字 に する と , 現在 
グラ フィ ッ ク 画 面 に 描か れ て いる パタ ー ン な ど は 一 時 的 に 消 
去 さ れ ま す 。 ま た 0 に すれ ば 元 に 戻り ます 。 
。 < 選択 色 の カラ ー コ ー ド > は , カラ ー ナ ン バ と 密接 な 関係 
に あり 次 の よう に な り ま す 。 8 色 あ る カラ ー コ ー ド の 中 か ら 
任意 の 1 色 を カラ ー ナ ン バ に 対応 きせ る こと が で きま す 。 


テキ スト 画面 の 
| 色 に 依存 し ます 。 





* CMD SCREEN が 実行 され る と . ビュ ー ポ ー ト は リセ ッ 
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Mt 


ト ヾ 


ト さ れ , 画面 の すべ て が 表示 可能 と な り ま す 


ロ 


100 CONSOLE 0,25,0,1 

110 CMD SCREEN 0,,3 

140 CPMD COLOR 3.0 

10 CMD CLS 3 

160 FOR =0 TO 199 STEP 3 
170 じ CMD LINE(0,0)-(639, 1 ) 
180 NEXT 1 

120 FOR 1=639 TO 0O STEP -8 
2Z00 CMD LINE(0.0)-(i,199) 
Z10 NEXT 1 

2Z0 FOR 1= 0 TO 3 

ZZ つ 。 CMD SCREEN 1 

2Z30 FOR J=1 TO 800:NEXT J 
2Z40 NEXT 1 

Z60 GOTO 220 
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CMD VIEW 画面 制御 ステ ー ト メン ト 

グラ フィ ッ ク 画 面 上 で の 表示 領域 (ビュ ー ボ ポー ト ) を 指定 し ま 
す 。 

CMD VIEW (Hx1。Hy1) 一 (Hx 2 Hy2 ) 

CMD VIEW(20, 20) 一 (300, 70) 





・ (Hxi, Hyi) を 左上 の 頂点 (Hx ぅ , Hy 。 ) を 右 下 の 頂点 と 
する 絶対 座標 系 上 の 長方形 を 高 解 像 グ ラフ ィ ッ クス 表示 領域 と 
し て 指定 し ます 。 こ の 領域 は ビュ ー ボ ー ト (View Port) と 呼 
ば れ ま す 。 
・ Nso-BASIC の 種々 の 命令 (CMD PSET. CMD LINE, CMD 
CIRCLE な ど ) は , ビュ ー ポ ボート の 範囲 外 に グラ フィ ックス を 
描く こと が で きま せん 。 
・ CMD VIEW は グラ フィ ックス の 表示 領域 の 指定 を 行 
うだ け で , 実際 の 画面 に 対す る 操作 は 行い ませ ん 。 し た が っ 
て 以前 の ビュ ー ボ ー ト 中 の 図形 が 移動 する よう な こと は あり 
まま 衝 た 。 
。 CMD VIEW の 指定 を 変え る だ け で , 1 つの 図形 を 描く 
ルー チン で も , 画面 上 の 異な る 位置 で 描く よう に な り ま す 。 
・ HHxi く Hx2, Hyi ぐ Hys が 成り 立た な い 場 合 , あるいは 
これ ら の 座 様 が 絶対 座標 の 男 囲 か ら 外れ て いる 場合 に は 
“Tllegal function call" ア エフ ラー が 起こり ます 。 
・ 一 度 設定 され た だ ビュー ボート は , 次 に CMD VIEW ある 
い は , CMD SCREEN が 実行 され る まで 変化 し ませ ん 。 ま た , 
LP は ビュ ー ボ ー ト の 左上 の 頂点 (Hxi, Hy1) に 設定 され ます 。 
・ リセ ッ ト あ る い は CMD SCREEN 実行 後 の ビ ュー ポー ト 
は 次 の よう に 設定 され て いま す 。 

の EN チドリ しほ コ ーー ド の ラー セード の と こき 

CMD VIEW (0,0) 一 (639,199) 
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4 色 カ ラー モー ド 0, 1 の と き 
CMD VIEW (0.0) 一 (319.199) 


・ CMD CLS 2。 また は CMD CLS 3 を 実行 する と グラ フィ ッ 
ク 画面 は 。 ビュ ー ボ ー ト 内 の み ク リア され ます 。 


CMD CLS, CMD SCREEN. 1 童 ・ ビ ュー ポー ト 


10 CMD CLS 3 

2Z0 FUR IT=0 TO KND( 1 )*20 
30 FOR M=2 TU 3 

40 FUR J=0 TU KNU( 1 )X%20 
っ 0 CMD SCKEEN MJRKND( 1 )x8 
6U0 CMUD CULUR ,RNUD( 1 )※4 

7U_ CMD VIEM(RNU(1)%※320 KND( 1 )%200)-(RNU( 1 )%320 ,RKND( 1 )%※200 ) 
80 CMU CLS Z 

0 CMD CIRCLE(10,」10),10 
100 NEXT 

110 NEXT 

1Z0 NEXT 

130 CMD SCRKEEN 2 

150 CMD CLS 2 

160 END 
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画面 制御 ステ ー ト メン ト 


テキ スト 画面 の 色 や 機能 を 指定 し ます 。 


COLOR [< ファ ンク ショ ンコ ー ド >〕] [〔, く < ヌル キャ ラク タコ ー 
ド >](, く グラ フィ ックス イッ チ >〕 


COLOR 3, 0, 1 


・ テキ スト 画面 に 対す る すべ て の 操作 に 使わ れる 色 や 機能 
を 設定 し ます 。 

* 。 Nso(N)-BASIC で は テキ スト 画面 と 低 解 像 度 グ ラフ ィ ッ 
ク 画 面 は 同一 の 画面 を 使用 し て いま す 。 し た が っ て , この 語 
令 に より キャ ラク タ 及 び 低 解像度 グラ フィ ッ ク の 機能 が キャ 
ラク タ 単 位 で 設定 され ます 。 

・ < ファ ンク ショ ンコ ー ド > は , テキ スト 画面 の 文字 に いろ 
いろ な 機能 を 与え ます 。 こ の ファ ンク ショ ンコ ー ド は , 現在 
テキ スト 画面 が カラ ー モ ー ド に な っ て いる か , 白黒 モー ド に 
な っ て いる か に よっ て 働き が 異な り ま す 。 





白黒 モー ド の 場合 (CONSOLE,,,0) 
0 一 ノー マル (通常 の 表示 ) 
1 一 シー クレ ッ ト ( 文 字 は 表示 され な い ) 
2 一 プリ ンク (点滅 する ) 
3 一 シー クレ ッ ト ( 1 と 同じ ) 
4 一 リバ ー ス (反転 する ) 
S 一 リバ ー ス シー クレ ッ ト ( 反 転 し て 文字 は 表示 され な 
い ) [ 
6 一 リバ ー ス ブリ ンク (反転 し て 点滅 する ) 
(つり 2 ベッ シー ンク レツ ト (5 と 周 )) 


カラ ー モ ー ド の 場合 (CONSOLE.,,,1) 


作 1 一 青 2 一 赤 ンク 
4 一 緑 5 一 シン アン 6 一 黄色 7 一 白 


> < ヌル キャ ラク タコ ー ド > は テキ スト 画面 を クリ ア し た 場 


2 ノー) 1 








合 に 表示 され る キャ ラク タコ ー ド を 指定 し ます 。 通常 は 0 を 
指定 し ます 。 

・ < グラ フィ ックス イッ チ 〉 を 1 に すれ ば 低 解 像 度 グ ラ 
フィ ッ ク モ ー ド に ,。 0 に すれ ば キャ ラク タモ ー ド に な り ま す 。 
キャ ラク タモ ー ド で 低 解 像 度 グ ラフ ィ ッ ク 命 令 を 実行 する と 
キャ ラク タ 画 面 が 乱れ る こと が あり ます 。 し た が っ て , 低 解 
像 度 グ ラフ ィ ッ ク を 使用 する と き は < グラ フィ ックス イッ チ > 
を 1 に し て くだ さい 。 

1 行 中 で , 20 回 以上 違う 色 や 機能 を 指定 し て も 無視 され ます 。 
また , キャ ラク タ と 低 解 像 度 グ ラフ ィ ッ ク の 混在 も 20 カ 所 以 
上 , 変更 点 が ある 場合 , 動作 が 保障 され ませ ん 。 


CONSOLE 


con ら =ole ai 


0 *N80-BASIC 
N80-BAS』C 
0k 


console 」 ょ 。。1 


color 4 

Uk 

prin も  N80-BASIC" 
N80-BASTIC 

0k 


CONSOLE IN| 画面 制御 スス テー トメント 








テキ スト 画面 の モー ド 設 定 を 行い ます 。 

CONSOLE〔< ス クロ ー ル 開始 行 >], 〔< く スク ロー ル 行 数 > < 
ファ ンク ショ ン キ ー 表 示 ス イッ チ >〕][,< カ ラー/ 
白黒 スイ ッ チ >〕 

CONSOLE 0, 25, 0, 1 

・ < スク ロー ル 開 始 行 > と < く ス クロ ー ル 行 数 > を 指定 する こと 

に より , 画面 上 で スク ロー ル す る 領域 (スク ロー ルウ ィ ン ド 

ウツ) を 指定 し ます 。 

・ < スク ロー ル 開 始 行 〉 は , どの 行か ら ス クロ ー ル を 開始 す 

る か を 指定 し ます 。 な お 画面 の 最上 行 が 0 と な り ま す 。 

・ < ファンクション キー 表示 スイ ッ チ > に 1 を 指定 する と 画 

面 最 下行 に . ファ ンク ショ ン キ ー に 登録 され て いる 文字 列 を 

表示 し ます 。 0 を 指定 し た 場合 , この 表示 は され ませ ん 。 

・ <〈 カ ラー ン ノ 白 黒 ス イッ チ >〉 を 1 に 指定 する と テキ スト 画面 

を カラ ー モ ー ド に し , 0 を 指定 し た 場合 に は 曰 黒 モー ド と な 

り ま す 。 

・ リセ ッ ト 後 の 初期 化 さ れ た 状態 で は , < スク ロー ル 開 始 

行 y>,。 < スク ロー ル 行 数 ヶ >,、 < ファ ンク ショ ン キ ー 表 示 ス イッ 

チ >, 〈 カ ラー グ 白 黒 ス イッ チ > は それ ぞ れ 0, 20, 1, 0 に 

設定 され ます 。 ま た , それ ぞ れ の パラ メー タ を 省略 し た と き 

は , 現在 定義 S8 れ て いる 値 と 同じ に な り ま す 。 


110 PRKINT CHR ま (12)』: CMD CLS 1 
120 CONSOLE 0,25,0,1 

130 FOR =1 TO 25 STEP 4 

1 40 CONSOLE 0,1 

150 GOUSUB 190 

160 NEXT ] 

170 END 

180 “-- print=ub -- 

120 PRINT CHR ま (12): cmd cl 
200 FOR J=1 TO 40 

240 PRINT J 

220 FOR K=O0 TO 10:NEXT _K 


ノ Z30 NEXT J 
2Z40 RETURN 
2-53 


CONT INNJIN| 一 般 コ マン ド 











スト ッ プ キー 入力 後 。 また は STOP に よっ て 停止 し た プロ 
クラフ ラム の 実行 を 再開 し ます 。 

CONT 

CONT 


・ CONT は 通常 フロ グラ ム の 誤り を 直す た め に STOP と 共 
に 用 いま す 。 

・ フロ グラ ム の 実行 停止 後 ,、 ダ イレ クト モー ド で CONT 
を 入力 する と 停止 し た 次 の 文 か ら 実行 が 再開 き 
れ ま す 。 ただし, INPUT, LINE INPUT で 実行 が 停止 し た 
場 全 ,. それ ら の 命令 か ら 実 行 が 再開 され ます 。 

・ 実行 を 停止 後 ダ イレ クト モー ド で 変数 の 値 を 変更 し た 
り , 表示 し た 後 , CONT に よっ て 実行 を 再開 する こと が で き 
ます 。 だ た だし, ブフ ログラム の 変更 が あっ た と き は エラ ー と な 
り ま す 。 

・ STOP の 他 に , END で 終了 し た ブフ ブログ ラム も CONT で 実 
行 を 再開 する こと が で きま す 。 


100 "CUNT test 


110 1=10 

12Z0 PRKINT T,SQR(T) 
130 STOUP 

140 【 ニ =[+1 


150 GOTO 120 


10 う 3 。16228 
Break in 130 


1 1 さ 。31663 
Break in 130 
U 


12 3 。4641 
Break in 130 
0 


1 コ 3.60555 
Break in 130 


COS IN| 数 値 関数 


余弦 (コサイン ) の 値 を 与え ます 。 
COS(< 数 式 >) 
A= テ COS(C/B) 





。 < 鍵 式 > の 単位 を ラジ アン (zz/180X 角 度 ) と し た と き の 余 
紋 ( コ サイ ン ) を 与え ます 。 


・ COS 関 数 の 演算 は 単 精度 で 行わ れ ま す 。 


100 -- COS カラ SEC( セ カン ト ) ヲ モト メル 一 

110 INPUT "カク ト " ( ト *") : 3D 

120 CS=COS(D/180※3。141 コ 92265358979 特 ) 

130 PRINT “CO0S "jiUSING 乾 補 欄 " 50Dj:PRINT = 3CS,。 
140 PRINT "SEC"jUSINO 幸 折 電 "3Di 

150 IF ABS(CS ) く =1E ヒ ー06 THEN 180 ELSE SC=1/CS 
160 PRINT "= sSC 





170 END 

に い ロ 

カク ト ” ( ト ") ji の 45 

CUS 45 = ー 707107 SEC 45 = 1.41421 
Uk 
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CSAVE 入出 力 コ マン ド 


メモ リ か ら カ セッ ト テ ー プ へ プロ グラ ム を セー ブ し ます 。 
CSAVE< フ ァイル 名 > 
文例 ) CSAVE “DEMO" 





・ CSAVE は メモ リ 上 の ブロ グラ ム を 指定 され た 〈 く ファ イル 
名 > で カセ ッ ト ヘ セーブ する 命令 で す 。 
・ < ファ イル 名 >〉 は 6 文字 以内 で 指定 し て く だ さい 。 
・ ブフ ブログ ラム の セー ブ が 完了 する と , 画面 に “Ok" と 表示 
し て コマ ンド レベ ル に 戻り ます 。 


こら 8V ひ 6 SumO_ 


Uk 

















IIN) 数 値 関数 


整数 値 。 倍 精度 実数 値 を 単 精度 実数 値 に 変換 し ます 。 
CSNG(< 数 式 > ) 
A! ニ CSNG(C 半 /2 ) 


・ < 数 式 > の 値 を 有効 数 字 の 6 桁 の 単 精度 実数 値 に 変換 し ま 


。 結果 の 値 が 一 1.70141E 十 38 一 1.70141E 十 38 の 男 囲 に 
な いい ときには, “Overflow" エラ ー が 起り ます 。 


CINT, CDBL 


100 “ーー ショ ウス ウ テ ン イカ ニン イ / か タ テ "/ 4 ミシャ 5 ニ ュ ウ 一 
110 A 革 =1 。234 コ 6/8B ツ 9 析 昌 =1 : GUSUB 140GOSUB 170 
120 AA 持 =1 、234 つ 6/89 < 員 = ア 650SUB 140:GO0SUB 170 
130 END 
14 有 0 F A 補 =ENT(A 福 ) THEN AD#=A 攻 RETURN 
150 AD#=INT(A#x10“D ロ + 5)/10“^H 
160 RETURN 
170U_ PRINT Af#。CSNG( AD せ ) 
180 RETURN 
F HPFI 

1 。23456789 1 。2 

1 。2Z3456789 1 。2345 ァ 
Uk 


CSRLIN 画面 制御 予約 変数 








テキ スト 画面 上 の 現在 の カー ソル の 垂直 位置 を 与え ます 。 
CSRLIN 
Y=CSRLIN 


・ 現在 の カー ソル の 垂直 位置 を 行 単 位 で 与え ます 。 

・ 得 ら れる 値 は , 25 行 モー ド で 0 か ら 24, 20 行 モー ド で 
は 0 か ら 19 と な り ま す 。 な お , 画面 の 最上 行 が 0, 最 下 行 が 
24( まだ ば は 9) と な っ て いま す 。 


POS 


100 “-- ヒ " リ ヤー ト " / シミ ュ レ ーション 一 - 


101 MIDTH 80,2SiCMD CLS 1 


110 LOCATE 1,2:PRINT STRING ま (78,"@" ): 

120 LOCATE 1,23:PRINT STRING*$(78, "人 @" ) : 

130 FOR I=3 TO 22:LOCATE 0,1:PRINT 「@': 

140 LOCATE 79,1:PRINT "@" :NEXT 

150 LOCATE 0,2:PRINT "@"』:LOCATE 79,2:PRINT 「@"': 
160 LOCATE 0,23:PRINT "@" 』:LOCATE 79,23:PRINT 「@": 
170 F=1 :X=RND( 1 )* ア ィ +1 :C=RND( 1 )x18+3 

180 FOR X=X TO 78 

190 LOCATE X0,CO:PRINT " 『: 

200 IF CSRLIN=22 OR CSRLIN=3 THEN F=Fx-1 

210  C=C+F:iLOCATE X,C:PRINT "@" : :X0=X:C0=C 

220 NEXT X 

230 FOR X=78 TO 2 STEP -1 

240 LOCATE X0。CO:PRINT " ': 


250 IF CSRLIN=22 OR CSRL IN=3 THEN F=Fx-1 


Z60 じ =C+F iLOCATE X,CIPRINT 介 3 :X0=X iC0=C 
270 NEXT X 
2Z80 GOTO 180 
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CVI/CVS/CVD 数 値 関数 


文字 列 で 表 さ れ た 値 を 数 値 デ ー タ に 変換 し ます 。 
1) CVI(<2 文 字 の 文字 列 >) 
2) CVS(<4 文 字 の 文字 列 ) 





3) CVD(<8 文 字 の 文字 列 >) 
1) A= テ CVI(AS /) 
2) BーCVS(“A3BD" ) 
3) C せ CVD(NMS$) 


。 フロ ッ ピ ィ デ ィ ス ク 上 の ラン ダム アク セス ファ イル か ら 
読み 込ん だ デー タ は 文字 型 に な っ て いる た め CVI, CVS, CVD 
関数 を 使っ て , 数 値 デ ー タ に 変換 し な けれ ば な り ま せん 。 

。 CVI は 2 文字 の 文字 列 ( 即 ち 2 バイ ト の デー タ ) を 整数 値 
に , CVS は 4 文字 の 文字 列 を 単 精度 実数 値 に , CVD は 8 文 
字 の 文字 列 を 倍 精度 実数 値 に それ ぞ れ 変換 し ます 。 





MKI$/MKS$/MKD$ 





100 “-- 1nPu セ va lue Trom Frandom 千 ile -- 

110 OPEN "cusmks AS 持 1 

120 FIELD 1。2 AS A1,4 AS A2 ま ,8 AS A3$ 

1 30 GET 件 1 。1:A1 を = じ CVT(A1 和 も): A21=CVS(A2$ ) : A3# せ =CVDU( A3 も ) 
1 40 PRINT A1 シ %。 2 1 。A3 析 

150 END 


PT 


et 1 ,234 コ 6 うさ 。141592265358979 
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DATA MIN| 一 般 ス テー トメ ント 


READ で 読み 込ま れる 数 値 , 文字 定数 を 格納 し ます 。 
DATA 1 NEC, PC-8001MK2 





・ DATA は 非 実行 文 で プロ グラ ム の どこ に お いて も か ま 
いま せん 。 

・ 1 つの DATA に は , 1 行 (255 文 字 ) に 入る だ け の デー タ 
を セッ ト す る こと が で き , また 1 つの プロ グラ ム の 中 に いく 
つも の DATA を 置く こと が で きま す 。 

・ READ は , 行 番号 の 小さ い 方 か ら 順 番 に DATA の 中 の 
デー タ を 読み 込ん で いき ます 。 

・ READ され る 回 数 より デー タ の 個数 が 少な い 場 合 (READ 
に 対応 する デー タ が な い 場 合 ) "Out of data' エラ ー が 起り ま 
す 。 

・ < 定数 >〉 は , 数 値 定数 (整数 固定 小数 点 , 浮動 小数 点 , 
16 進 数 , 8 進数 ), 文字 定数 の いずれ か で す 。 た だ し , 定数 
M( 2 ※ 3 な ど ) は 許さ れ ま せん 。 ま た , READ で 読み 込ま れ 
る 場合 , READ で 指定 され て いる 変数 の 型 は , 対応 する デー 
タ の 定数 の 型 と 一 致し な けれ ば な り ま せん 。 

・ DATA の 中 の デー タ は , コン マ ( , ) で 区 切ら れ ま す が 、 
文 字 定 数 の 中 に コン マ , コロ ン ( : )、。 ま た は 文字 列 の 前 後に 
意味 の ある 空白 を 含む と き は , その 文字 定数 全体 を ダブ ル 
クォーテーション マー ク ( ” ) で 半 む 必要 が あり ます 。 

・ RESTORE に よっ て READ で 読み 込む DATA を 行 単位 で 
指定 する こと が で きま す 。/ 
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100 DATA 10,10。 PC-8001MK]E ,′ PC-8001MKJL ^ 
110 READ A 

120 READ B ま :B=VAL('&H'+B$*) 

130 READ C ま :READ D$ 

140 PRINT AiPRINT B 

150 PRINT C ま :PRINT D$ 


ビ い un 

10 

16 
PC-8001MKJL 、 
PC-8001MKJL / 





Uk 
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NN 文字 予約 変数 


内 蔵 の カレ ンタ 時 計 の 日 付 を 与え ます 。 
DATES 
PRINT DATE$ 


・ DATE$ に は 内 蔵 カ レン ダ 時 計 の 日 付 が 入れ られ て お り . 
文字 変数 に 代入 し た り , PRINT で 内 容 を 表示 する こと が で き 
ます 。 

・ ユー ザー は DATE$ に 日 付 を セッ ト す る こと も で きま 
す 。 文字 定数 の 型式 は YY/MM/DD ( 例 : “83/01/01) と な り . 
それ ぞ れ 2 文字 で 年 , 月 , 日 を それ ぞ れ 指定 し ます 。 





アッ プ に 


PC-8001MKII 内蔵 の カレ ンダ 時 計 は バッ テ チ テリー バッ ク 
より 常 日 付 を を 更新 し て いま す 。 


- 83/12/25* --〉> "25,。Dec . 1983" -- 


"ーー examp le 


DIM MN$ も (12) 


120 FOUR =1 TO 12 

13U KRKEAD MN$t() 

140 NEXT 1 

150 INPUT “date (YY/MM/DD) "jD ま 
160 DATE 中 =D ま も 

170 5OSUB 210 

180 PRKINT_ DATE  --> " ぉ 』M ま も 

120 END 

200 “trnsg 

210 M ま =RKTIGHT ま (DATE ま ,2)+" 


J) 了 M 中 = M&+MNS (VAL(MID$(DATE, 4。2)) ) 


230 M=M ま + "19"+LEFT ま (DATE ま 。 2) 
240 RETURN 
250 DATA Jan,Feb, Mar Abr , May 。 Jun 


Z60 


Ph 


UATA Jun,Aug, Sep , 0c て 。Nov 。 Dec 


date (YY/MM/DD) ? 83/01/01 
83/01/01 --> 01,Jan .1983 
Uk 
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DEF FN 一 般 ス テー トメ ント 


ユー ザ に よっ て 作ら れ た 関数 を 定義 し ます 。 
DEF FN< 名 前 >((<〈 パ ラメ ー タ リス ト >)〕 三 < 関数 の 定義 式 > 


DEF FNA(X, Y) 三 SQR(X^2 十 Y^2) 





・ 関数 の 名 前 は "FN" 十 < 名 前 〉 で 定義 され ます 。 

。 < 名 前 > は 変数 名 と し て 正しい 形 を し た も の で な けれ ば な 
り ま せん 。 変 数 名 は 最初 の 2 文字 まで の 判別 し か し ませ ん 。 
。 パラ メー タリ スト > は その 関数 が 呼ば れ た と き に , 〈 関 
の 定義 式 > 中 の 同じ 変数 名 に 対応 し , 変数 名 の 間 は コン マ 
で 区 切り ます 。 

・ < パラ メー タリ スト > に 書か れ た 変数 名 は 〈 関 数 の 定義 式 > 
を 評価 する 際 に の み 有 効 と な り ま す 。 し た が っ て ブロ グラ ム 
中 に 同じ 変数 名 が あっ て も 影響 は あり ませ ん 。 

140 FG=FNFU(GA,NN,NE ) 


150 TG=FNTA(GA,NN, NE ) 
160 F も = " 平 半 杜 村 相 提 補 欄 柱 革 。。 





170 PRINT “フク リ テ " 八 USING F ま jiFG 
180 PRINT "タン リ テ * 八 USING F*:TG 


PHFr1 
が " ッ キ ン :? 100000 
ネン リ :? 。07 


ネン スウ %? 10 

フク リ チ テ * ル 党 196。 715。 
タン リ テ “ ル 昌 170.000 。 
DUk 
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DEF INT/SNG/DBL/STR 








一 般 ス テー トメ ント 


変数 の 型 宣 言 を し ます 。 
DEF | INT (文字 の 男 囲 〉 〔。 < 文字 の 範囲 〉……-) 


DEFINT A,』ーN 


・ < 文字 の 範囲 > で 指定 され た 文字 で 始ま る すべ て の 変数 名 
型 を 。 次 に 示す 型 宣言 に より 定義 し ます 。 
DEFINT : 変数 を 整数 型 に 
DEFSNG : 変数 を 単 精度 型 に 
DEFDBL * 変数 を 倍 精度 型 に 
DEFSTR : 変数 を 文字 型 に 





・ < べ 文 字 の 範囲 > は, 1 文字 の 英字 で 指定 し ます 。 ま た ある 
電 時 に わた っ て 指定 する と き は , 1 文字 の 英字 と 1 文字 の 英 
子 を ハイ フン (一 ) で つなぎ ます 。 但 し, 最初 の 英字 は , 後 の 
英字 より も アル ファ ベッ ト 順 で 先 の も の で な けれ ば な り ま せ 
ん 。 

・ 型 宣 言 文字 に よる 指定 が ある 場合 , これ ら の DEF 型 宣 





・ 崖 宣言 が 行わ れ て いな い 文 字 で 始ま る 変数 は , すべ て 単 
精度 変数 と みな され ます 。 


10U0 UEFINT i-MN 

110 DEFSNG AB 

120 DEFDBL D 

130 11=1 、23? J=65 643 

140 AB=1 、23:BB=65 。 643 

130 0D=3.141 コ 9265358 の 7 の 2 
160 D%=3。141392654000001 
470 PRINT 11 = 11。。 = ョ J 
180 PRINT "AB = ぉ AB。,。 BB =”"?BB 
190 PRINT D = jiD。D ="3D を 
<Z00 END 


ロ 
6 う ,643 
う 


て 
山 
ll 上 中 


ュ ・ ノ づ 
D = 3。1415926 つ 30989 7 ツン D% 
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DEF USR 特殊 ステ ー ト メン ト 


後 械 語 で 作ら れ た ユー ザ 関 数 の 実行 開始 番地 を 定義 し ます 。 
DEF USR に 番号 >] 三 < 開始 番地 > 
DEF USR3 ニ &HDAOO 








・ USR 関数 (ユー ザ 関 数 ) が 呼び 出す . 
突 行 開始 番地 の 設定 を 行い ます 。 

・ < 番号 〉 は 0 一 9 まで の 値 で , USR 十 < 番号 〉 が 関数 名 と な 
り , 関数 名 に よっ て 機械 語 で 作ら れ た ブロ グラ ム が 呼び 出さ 
れ ま す 。 < 番号 > を 省略 し た と き は 0 と みな され ます 。 

・ (開始 番地 > は 機械 語 プ ログ ラム の 実行 開始 番地 を 指定 し 
ます 。 ま た , ユー ザ が 作成 し た 機械 語 プ ログ ラム を 呼び 出 
す 場 合 , 〈 開 始 番 地 > は , CLEAR の く < メ モリ の 上 限 〉 で 指定 し 
た 番地 より 後 で な けれ ば な り ま せん 。 

R 関数 の 作り 方 に つい て は , 付録 B 機械 語 プ ログ ラ 
ム の 作り 方 を 参照 し て くだ さい 。 














USR, 付録 B 機械 語 プ ログ ラム の 作り 方 。 ン 


100 CLEAR 300.,&HBFFF 
110 DEF USR=&HC000 
120 A=USR( 1 ) 

130 END 





DELETE 一 般 コ マン ド 


プロ グラ ム の 行 を 削除 し ます .。 
) DELETE< 始 点 行 番号 > [一 < 終点 行 番号 >〕 
DELETE 500 一 620 





解説 ) ・ < 始点 行 番号 ? か ら <《 終 点 行 番号 ? ま で の フ プログ ラム を 削除 
し ます 。 

* < 始点 行 番号 〉? だ け を 指定 し た 場合 は その 行 だ け を 削除 し 
ます 。 こ の 場合 DELETE を 省略 し て 行 番号 だ け の 入力 と 同 
じ に な り ま す 。 

> ハイ フン と < 終点 行 番号 〉? の み を 指定 し た 場合 . プロ グラ 
ム の 先頭 か ら 指 定 行 ま で を 削除 し ます 。 

100 “" DELETE コマ ント " / サン フ ? 和 見 フ 5 ロ グ クラム 

110 

120 ′” DELETE コマ ッ ト * 八 ラテ イ ミタ キ " ョ ウ ラ 

130 "サクシ" ョ ラマ ス 

140 PRINT "DELETE コマ ント " / サッ ファ ル ファ ロク" ラム" 

150 PRINT "DELETE コマ ント " ハラ テイ シタ キネ" ョ 9 ラ " 


160 PRINT " サク ラ * ョ マス” 
17 有 0 END 





Uk 
delete 110-130 
Uk 


1 ia も 

100 ” DELETE コマ ッ ト " ノ サン ファル フロ クツ ラム 

140 PRKINT DELETE コマ ント * ノ サン フル ファ ロク" ラム" 
1 つ U PRKINT DELETE コマ ント * 人 ラテ イ ミタ キ " ョ ウリ ラフ" 
160 PRKINT “ サ 2 シ " ョ シマ ス " 

170 END  . / 

Ok 
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Ne IN 


一 般 ス テー トメ ント 


配列 変数 の 要素 の 大 き さ を 指定 し , メモ リ 領 域 に 割り 当て ま 
す 。 

DIM< 変 数 名 >(< 添 字 の 最大 値 >[, < 添字 の 最大 値 〉…〕) 

DIM A(10, 10) 


・ 配列 変数 の 添字 の 最大 値 を 設定 し , 同時 に メモ リ 上 に そ 
の 配列 の 領域 を 割り 当て ます 。 

・ < 添字 の 最大 値 > の 個数 は , その 配列 変数 の 次 元 を 示し ま 
す 。 ま た, 次元 は メモ リ の 許す 限り 255 次 元 まで 使用 で きま す 。 
・ DIM を 宣言 せ すす に 配列 変数 を 用 いた 場合 , その 添字 の 最 
大 値 は 10 と みな され ます 。 

・ < 添字 の 最大 値 > よ り 大 きい 値 の 添字 が 用 いら れ た 場合 
は , “Subscript out of range" の エラ ー が 起こ り ま す 。 

・ また , DIM が 実行 され た だ た 時点 で , その 配列 の すべ て の 要 
素 の 値 は 0 (文字 型 の 場合 は ヌル スト リン グ ) に 設定 され ま 
す 。 


100 ク ク ノ ヒョウ ラリ クル 

110 DIM KU(9,9) 

13U0 FOUR T=1 TU 9:FOR J=1 TO 9 

140 KU 1 。J)=T※J 

150 NEXT J,1 

160 FOR =1 TO 9:FOR J=1 TO 9 

17U PRKINT _ USING 「 拉 韻 柏 柏 " KU(J。』 TI) 

180 NEXT JiPRINT 

120 NEXT 1 

Z00 END 

"un 
1 2 づ 4 9 6 M に ) ッ 
〆 1 っ 8 10 12 14 16 18 
づ っ 2 12 15 18 21 24 2 ァ 7 
| 6 12 16 20 24 28 32 36 
っ 10 15 20 25 30 35 40 45 
6 12 18 24 30 36 42 48 54 
7 14 21 28 35 42 49 56 e3 
8 16 24 32 40 48 56 ez4 72 
2 18 2Z 36 45 54 6e3 72 81 

Uk 
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(1)DSKF [sl 入出 力 関数 





フロ ッ ピ ィ デ ィ ス ク の 情報 を 与え ます 。 
DSKF(< ド ライ ブ 番 号 >〔, < 機能 >〕 ) 
PRINT DSKF(1) 





・ < ドラ イブ 番号 > で 指定 され た ドラ イブ に 入っ て いる フ 
ロッ ピ ィ ディ スク に 関す る 情報 を 関数 の 値 と し て 返し ます 。 
・ < 機能 > は 値 と し て 返す 情報 の 種類 を 指定 し ます 。 < 機能 
と し て 指定 する 値 と .。 その 時 に 返さ れる 関数 の 値 の 意味 は 次 
の よう に な っ て いま す 。 





省略 され た 時 : フロッピ ビィ デ ィ ス ク の 
単位 で 返す 。 
() 1 ……ー 最 大 ト アツ ク 番号 
(= 片面 当り の トラ ッ ク 数 一 1 ) 
ee 片面 フロ ッ ピ ィ デ ィ ス ク ( 0 を 返す ) 
ある い は 両面 フロ ッ ピ ィ デ ィ ス ク ( 1 を 返す ) 
ま vwwuwwwe ま か ゲッ ダ 当 り 人 の オイ テス メダ 者 
4 (ie…… ボ リュ ー ム 当り の クラ スタ 数 
5 … ーー バディ イレ クト リト ラッ ク 番 号 
6 :…… ii…… ユ クラ スタ 当り の セク タ 数 
7 ・… ム FAT の 開始 セク タ 番 号 
に 全 間 OO "FAT の 終了 セク タ 番 号 


り 容量 を クラ スタ 





・ ドラ イブ の 種類 や ディ レク トリ , クラ スタ , FAT に つ 
いて は , PC 一 8001MKI ユ ー ザ ー ズ マニ ュ ア ル を 参照 し て く 
だ さい 。 
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100 INPUT “griue number "DR 


110 PRINT "Track ="sDSKF(DR。0 )j"/Driue " 
120 PRINT Sector =" jiDSKF(DR , 1 ) 』" /Track 


130 PRINT "Disk space ="sDSKF(DR ) 


し い n ロ 
Track = 34 /Drive 
Sector = 19 /「rack 
Disk space = 2Z6 

0k 
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(2)DSKF 











ディ スク み 


ellN] 入出 力 関数 


フロ ッ ピ イィ ディス ク の 残り 容量 を 与え ます 。 
DSKF(< ド ライブ プ 番 号 >) 
PRINT DSKF(1) 


*・ 〈 ド ライ ブ 番 号 〉 で 指定 され た フロ ッ ピ ィ デ ィ ス ク の 残り 
容量 を クラ スタ 単位 で 返し ます 。 

・ DISK 一 BASIC で は ミニ フロ ッ ピ ィ デ ィ ス ク だ けし か 使 
用 で きま せん か ら 1 ク ラス ター8 セ クタ (2K バ イト ) に 固定 
され て いま す 。 


(1)DSKF 


PP1n も も d ョ k 和 †( 1 ) 
45 


0k 
p ビ ュ ロ 七 dak 和 †( 2 ) 
5 の 


Uk 











[| MIN] 入出 力 関数 


フロ ッ ピ イィ ディス ク か ら 直 接 デ ー タ を 読み 込み ます 。 
1) DSKI$(< ド ライ ブ プ 番 号 >,。 < トラ ッ ク 番 号 >。 〈 セ クタ 番 
号 > ) 


2) DSKI$(< ド ライ ブ 番 号 〉、 < ヘッ ド 番 号 >。 < トラ ッ ク 番 
号 〉, < セク タ 番 号 >) 


1) D$=DSKIS(1, 18, 3) 
2) D$=DSKIS(2, 0, 19, 1) 


・ 通常 の ファ イル 操作 (OPEN, CLOSE) と は 無関係 に 。 フ 
ロッ ピ ィ ディ スク 上 の 指定 し た セク タ か ら 直 接 デ ー タ を 読み 
込み ます 。 

・ DSKI$ は , 指定 され た セク タ 上 に 書か れ て いる デー タ 
256 バ イト を 0 番 バ ッ フ ァ に 読み 込み , 最初 の 256 文 字 の 文字 
列 を 関数 の 値 と し て 返し ます 。 

・ 文字 列 の 長 さ は 255 文 字 ま で し か 許さ れ ま せん か ら , 
DSKI$ 関 数 の 値 と し て 256 バ イト の デー タ す べ て を 1 度 に 得 - 
る こと は で きま せん 。 そこで , ラン ダム アク セス の 場合 と 同 
じ よ うに FIELD に より 0 番 バ ッ フ ァ へ 複数 の 文字 変数 を 割 
り 当 て る こと に より 解決 で きま す 。 ま た は , VARPTR 関数 
に より , 0 番 バ ッ フ ァ の 置か れ て いる メモ リ 番 地 を 調べ た 上 
で PEEK 関数 に より バッ ファ か ら デ ー タ を 読み 出す こと も で 
きま す 。 

*・ 〈 ヘ ッ ド 番号 〉 は , 指定 され た 〈 ド ライ ブ 番 号 〉? の フロ ッ 
ビィ ディ スク が 両面 の 場合 に の み 必要 で ,。 0 また は 1 で 指定 
ます 。 

・ バト ラッ ク 番 号 〉, < セク タ 番 号 〉 と し て 指定 で きる 値 の 範 
胃 は , 指定 され た 〈 ド ライ ブ 番 号 y の ディ スク ドラ イブ の 種類 
に よっ て 異な り ま す が , BASIC は これ ら の 値 の 範囲 を 自動 


2 ノー/2 











的 に 調べ , 不当 で あっ た 場合 に は "Tlegal faunction call" また は 
“Bad surface/track/sector" エ ラー が 起り ます 。 
・ DSKI$ は 対象 と する ディ スク ドラ イブ が 片面 ディ スク で 
ある か 両面 ディ スク で ある か に よっ て 書式 が 変り ます 。 
1) の 書式 は 片面 フロ ッ ピ ィ デ ィ ス ク を 対象 と する 場合 で あ 
り , 〈 ヘ ッ ド 番号 > の 指定 は 必要 あり ませ ん 。 
2) の 書式 は 両面 フロ ッ ヒ ィ イデ ィ ス ク を 対象 と する 場合 で あ 
り , 〈 ヘ ッ ド 番号 〉 を 指定 し な けれ ば な り ま せん 。 


Nso DISK 一 BASIC 使用 時 に 複数 の ディ スク が 接続 され て いる 
場合 、 それぞれ の ディ スク の 情報 に つい て は DSKF に より 詩 
べ る こと が で きま す 。 


DSKO$ FIELD, (1)DSKF, VARPTR, PC-8001MKI ユー ザー ズ 
eS 7 ルル 


100 “-- read from disk (driec モ )ーー 

110 FIELD 0.128 AS A ま (OU)。128 AS Aa まま (1) 
120 INPUT “Drive iDR 

130 IF HKR<1 QR DR>8 THEN 120 

140 IF DSKF(UDR 。2)=0 THEN 170:INPUT “Track,Sector iTR。SE 
150 INPUT "Surface SU 

160 IF SU<0 OR SU>1 THEN 150 

170 INPUT "Track。Sector jTR,SE 

180 』JF TR<O OR TR>DSKFCDR。0) THEN 170 
190 IF SE<1 QR SE>DSKF(DR。1) THEN 170 
200 IF DSKF(DR,2)=0 THEN 220 

210 DU ま も =DSKTI ま も (DR。SU。TRK,SE):GUTO0 2Z230 
220 DU も =DSKT ま (DR 。 TR ,SE ) 

230 FOR 1I=0 TO 1 

ノ 40 FUR J=O0 10U 〆 


の =]18 FOUR K=1 TO 16 

260 D も =HEX ま (ASC(MID ま (AA ま ( エ )。J※16+K。 1 ) ) ) 
270 PRINT RIGHT も ("0"+D も 2)5 : 6 
〆80 NEXT KkPRKINT 


290 NEXT J, iiEND 


UF1ive7 1 

ら SuFTace〆Z U 

TFack 。,Sector ア 16,1 

09 00 0A 00 3A 8F E2 0O0 48 OO 14 00 3A 8F E92 20 
20 20 4E 45 43 20 50 43 2D 38 38 30 31 20 20 2Z0 
44 65 6D 6F 6E 73 74 7Z2Z2 61 7Z4 692 6F 6E 20 Z0 〆2 
6F 67 72 61 6D 20 20 28 32 29 20 20 20 22 44 45 
4D[ 4F 55 54 55922 700 50 00 1E 00 3A 8F E9 00 ZB 
OU 28 OO ?E 20 OF 28 ZC OF 14 3A 9?D 20 31 2C DUF 
14 2C 311 2C 12 3A CB 20 18 3A HH3 20 11 2 し 14 3A 
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CE 
F5 
人 
30 
20 
46 
69 
2A 
22 
Ok 


Z0 
pm 
Z し 
1 
7U 
00 
63 
に 
00 


14 
55 
11 
20 
72 
D6 
73 
30 
0D 


う A 
42 
さ A 
44 


6F 6 


Z0 
20 
30 
01 


U3 
43 
ッ 1 
6 っ 


1 1 
『。 
Z0 
っ 0 


ZU 
4F 
Z0 
6D 
だ 
ノ 2 し 


61 
00 


11 


22 
6F 
61 
14 
72 


D6 


2 し 
F ト 
4E 
6E 
6 
づ A 


6 し 


64 
Z0 


1 1 
ョ アン 
4 コ 
7 づ 
Z0 
? ッ 1 
64 
Z0 
1 1 


2-74 


00 
00 
4 
74 
どん <] 
20 
2Z0 
うら 
Z じ 


00 
00 
っ 0 
61 
2 ウ 9 
4/ 
66 
3U 
づ A 


32 
3C 
43 
74 
22 
72 
20 
2A 
91 


UU 
U0 


ZD 


6 ツ 
0U 
61 
うら 6 
づ 4 
20 


8D 
[6 
38 
6F 
F 3 
7U 
34 
30 
ノノ 


20 
20 
38 
6E 
00 
68 
30 
30 
72 





fs | | IN| 入出 力 ス テー トメ ント 


フロ ッ ピ ィ デ ィ ス ク に , 直接 デー タ を 書き 込み ます 。 

1) DSKO$< ド ライ ブ 番 号 >,〈< ト ラッ ク 番 号 >, く < セクタ 番号 > 

2) DSKO$< ド ライ ブ プ 番 号 >、。 < ヘッ ド 番 号 >,。 < トラ ッ ク 番 
号 >, く < セクタ 番 号 > 

1) DSKOS 2, 10, 1 

2) DSKOS$ 1 0, 19, 1 


・ 通 常 の ファ イル 操作 (OPEN, CLOSE) と は 無関係 に , フロ ッ 
ピ ィ ディ スク 上 の 指定 し た セク タ へ 直接 デー タ を 書き 込み ま 
す 。 

。 DSKO$ は 既存 の フロ ッ ピ ィ デ ィ イス ク フ ァ イル を 圭 す 汐 れ 
が あり ます 。 し た が っ て フロ ッ ピ イィ ディス ク 及 び フ ァイル の 
構成 を 正しく 理解 し た 上 で 使用 し て くだ さい 。 こ れ ら に つい 
て は PC-8001MKH ユ ー ザ ー ズ マニ ュ ア ル を 参照 し て くだ さ 
い 。 

・DSKO$ は, その パラ メー タ に より 指定 され た セク タ に ., 
0 番 バ ッ フ ァ の 内 容 256 バ イト を 書き 込み ます 。 0 番 バ ッ フ ァ 
は , 通常 の ディ スク ファ イル 操作 する と き に は 用 いる こと が 
で きま せん が , DSKI$ と DSKO$ に よる 直接 操作 の と きだ け , 
ユーザ が 用 いる こと が で きま す 。 

・ 書 き 込 むせ ゲー タ の 準備 は , ラン ダム アク セス の 場合 と 同じ 
よう に FIELD に より 0 番 バ ッ フ ァ へ 変数 領域 を 割り 当て た 
後 , LSET, RSET に より 行い ます 。 ま た は , VARPTR 関数 に 
上 より, 0 番 バ ッ フ ァ の 置か れ て いる メモ リ 番 地 を 調べ た 上 で , 
POKE に より バッ ファ 中 に デー タ を 準備 する こと も で きま 
す 。 

<・< ヘ ッ ド 番号 > は 。 指定 され た 〈 ド ライ ブ 番 号 y の フロ ッ ピ イィ 
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ディ スク が 両面 用 の 場合 に の み 必 要 で , 0 また は 1 で 指定 し 
ます 。 

* バ トラ フッ ク 番 号 〉, 〈 セ クタ 番号 >? と し て 指定 で きる 値 の 範囲 
は , 指定 され た 〈 く ドラ イブ 番号 ? の フロ ッ ピ ィ デ ィ ス ク ド ラ イ 
ブ の 種類 に よっ て 異な り ま す が , BASIC は , これ ら の 値 の 範 
を 目 動 的 に 調べ , 不当 で あっ た 場合 に は "Tlegal functon 
cal" ま だ は "Bad surface/track/sector" エ ラー が 起り ます 。 
昌和 
に よっ て 書式 が 変り ます 。 
二村 委 本 全会 あ 
り , 〈 く ヘッ ド 番 号 〉 の 指定 は 必要 あり ませ ん 。 
了 E + で あ 
り 。 く < ヘッ ド 番 号 > を 指定 し な けれ ば な り ま せん 。 











Nso DISK-BASIC 使用 時 に , 複数 の ディ スク が 接続 され て いる 
場合 それ ぞ れ の ディ スク の 情報 に つい て は DSKF に より 調 
べ る こと が で きま す 。 / 


DSKI$, FIELD, (1)DSKF. VARPTR, PC-8001MKI ユ ー ザ ー ズ 


Ch が ルル 


100 "ーーーーー MM じ ュ て も to モ the di ヨ ak  。 。 。 ーーーーー 
110 XX%※ ココ / program 八 disk - テ "ー タ ヲ タダ "イレ クト - ※※ 
120 "XX※ カキ コミ マス カラ フ ヨ ウイ - ヨウ ラナ イ テ " クタ "サイ ※ 
130 FIELD 0。128 AS A*,128 AS B ま 

140 LSET A ま =STRING も ( 128。CHR ま も ( &HFF ) ) 

120 LSET B ま =STRING ま (128 。 CHR ま ( &HFF ) ) 

160 “" ョ tra セ 

170 INPUT “Driue "DR 

180 IF DR く <1 OR DR>8 THEN 170 

190 TTF DSKF( DR, 2)=0 THEN 230 

200 INPUT “Surface "3:SU 

2Z10 IF SU<O OR SU>1 THEN 200 

220 "reent " 

230 INPUT “Tcack 。Sector "3 TR。SE 

240 IF TR<O OR TR>DSKF(DR,0 ) THEN 230 

Z っ 0 IF SE く 1 OR SE>DSKFK( DR , 1 ) THEN 230 

260 IF DSKF(DR 。2)=0 THEN 290 

270 DSKO ま DUR, SU。TR。SE:GOTO 300 

280 "single 

290 DSKO0 ま * DR。,TR。SE 

300 END 

















一 般 ス テー トメ ント 


プロ グラ ム の 終了 を 宣言 し ます 。 
END 
END 


・ プ ログ ラム の 実行 を 終了 し , すべ て の ファ イル を クロ ー ズ スズ 
し て コマ ンド レベ ル に 戻り ます 。 

・END は プロ グラ ム の 実行 を 終了 させ る た め に , フロ グラ ム 
中 の どこ に 置い て も か まい ませ ん 。 

・ プ ログ ラム の 最後 の END は 省略 する こと が で きま す 。 た 
だ し , この 場合 ファ イル の クロ ー ズ は 行わ れ ま せん 。 


昌 





〆 


カセ ヤセ ヤット テー プ に セー ブ す る フロ グラ ム は 最後 に END を つ 
ける 習慣 を つけ て くだ さい 。END が な いと ロー ド し た こと き 
に 実行 で き な い こと が あり ます 。 





100 MIDTH 80,25 

110 CULOUR 〆 

130 “-- loop -- 

140 PRINT TIME$ 

1 コ つ 0 AA も =INKE Y 和 まま 

160 IF A ま =" ぉ THEN END 
170 GUTO 140 


に い n 
1 33 つ 3』 2Z0 
13:53』20 
13:03』21 
1 ココ ば く プ 1 
93*/1 
Uk 


EOF [sl 陣 IM 入出 力 関数 








ファ イル が 終了 し た か どう か を 検出 し ます 。 
EOF(< フ ァイル 番号 > ) 
IF EOF(1) THEN CLOSE+ せ 1 : END 


*・ シ ー ケ ン シ ャ ルフ ァイル に お いて < ファ イル 番号 〉 で 指定 さ 
れ た ファ イル が 終り に 達し た か どう か を 調べ る 関数 で す 。 

・ フ ァイル が 終わ り に 達し た と き , EOF 関数 は 真 (一 1 ), 
そう で な けれ ば 偽 ( 0 ) を 返し ます 。 


100 “ -- da も sa 1input 一 一 

110 OPEN "2:data5" FOR INPUT AS 1 
120 IF EOF(1) THEN 160 

1 30 INPUT 昔 1.A 

140 PRINT ム 

150 GOTOU 120 

160 CLOSE 


加 


コ 


CJ ト う ) 呈 記 


(つう 


2ー/S 


ERASE 











NN| 一 般 ス テー トメ ント 
配列 変数 を 消去 し ます 。 
ERASE く < 配列 名 >〔, < 配列 名 >……] 
ERASE D, DA$ 


・ 指 定 し た 配列 変数 を 消去 し ます 。 以後 同一 変数 名 の 配列 変 
炒 を DIM で 宣言 する こと が で きま す 。 ま た この と き の 配 列 
変 角 の 全 要 素 は 0 また は ヌル スト リン グ で クリ ア さ れ て いま 
す 。 

・ も し , ERASE を 実行 せ すず に 同一 変数 名 で 宣言 する こと , “Re: 
dimensioned array エフ ラー が 起こ り ま す 。 

・ERASE は その 配列 変数 に 割り 当て られ た メモ リ 開 域 を 別 
の 目的 で 使う こと も で きま す 。 

・ERASE で 使用 し て いな い 配 列 変数 を 消去 し て , 空い た メ 
モリ 領域 を 別 の 目的 に 使う こと が で きま す 。 こ の よう に し て 
*Out of memory' エ ラー を 防ぐ こと が で きま す 。 

すい 遇 科 6idR 

130 DIM B(200) セン ゲッ た 3 ッ 「 


Redimen ら 1ioned grFFay in 130 
Uk 
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ERL/ERR IN] 特殊 予約 変数 


エラ ー が 起こ っ た と き , その エラ ー コ ー ド 及び エラ ー の 発生 
し た 人 行 番号 を 与え ます 。 

ERL 

ERR 

LーERL 

ヒーERR 








・ エ フー が 発生 し た 時 点 で 。 ERR は を の エラ ー コ ー ド を . 
ERKL は エラ ー の 発生 し た 行 番号 を 持っ て いま す 。 

*・ エ ラー が ダイ レク トモ ー ド の 実行 に よっ て 生じ た 場合 
ERL は 行 番号 と し て 65535 を 持ち ます 。 

・ 通常, ERR 及び ERL は ON ERROR GOTO に よっ て 指定 し 
た だ エラー 処理 ルー チン に お いて , 処理 の 流れ を 制御 する た め 
に 使わ れ ま す 。 


ON ERROR GOTO 


100 “一 - X ノ Y も" ョ ウ ラ モト メル 。 一 
110 UN ERROR GOTO 200 | 
120 “も モ a ョ レセ 
130 INPUT メッ "5X。Y 
140 ANsX"Y 
150 PRKINT X に ブリ ョ Yj シ ツ ョ ウ AA" ANS "テス 。" 
160 GOTO 130 
170 PRINT "  ?2? テイ キ " サレ マセ ソン" 
180 END 
190 “-- error or Fou モ ine 一 一 
200 "error モ op 
Z10 iF ERR=11 AND ERL=140 THEN RESUME 170 
ZZ0 UN ERROUR GOT ロ 0 
ビ い n 
メ ゥ マ ? 243 
2 ノノ 3 る" ョ ウ 八 8 テ " ス 。 
メ ゥ アア 10。.4 
10 プ 4 ジジ " ョ ウ 八 10000 テ * ス 。 
※ ゥ ダダ 7 ーー1。3 
ー1 / 3 も " ョ ウ 八 一 1 テ \ ス 。 
x ゥ yy7 U。20 E 
0 / 20 る" ョ ウ 八 0 テ \ ス 。 
※ ぁ アア 0。ー-31 
プア ツア テイ キ " サレ マセ ヤン 
0k 





ERROR IN] 特殊 ステ ー ト メン ト 


ェ エ ラー 発生 の シミ ュ レ ー ト , エラ ー 番 号 の ユー ザ 定 義 を し ま 
す 。 
ERROR< エ ラー 番号 > 


文例 ) ERROR 251 





・< エ ラー 番号 〉 の 値 は 1 一 255 ま で の 整数 を 指定 し ます 。 

・ 指 定 し た 値 が ,。 すでに BASIC で エラ ー コ ー ド と し て 使わ 
れ て いる 場合 , ERROR が 実行 され る と , 〈 エ ラー 番号 に 対応 
する エラ ー メ ッ セ ー ジ を 表示 し , コ マン ドレ ベル に 戻り ます 。 
また , 指定 し た 〈 エ ラー 番号 〉 に 対応 する エラ ー メ ッ セ ー ジ が 
な いと き は , “Unprintable Error" と 表示 され ます 。 

・ ON ERROR GOTO が ある 場合 , ERROR が 実行 され る と , 
エラー 処理 ルー チン へ 分 岐 し ます 。 こ の と き , ERL に は 
ERROR が 実行 され た 行 番号 , ERR に は 〈 エ ラー 番号 〉 が それ 
ぞ れ 代入 され ます 。 

・BASIC で 使用 きれ て いな い 〈 エ ラー 番号 > を ユー ザ が 定義 す 
る こと に よっ て エラ ー 処 理 ル ー チ ン 内 で ERR を 利用 する こ 
と も で きま す 。 


ON ERROR GOTO. ERL/ERR. エ ラー コー ド 表 


100 UN ERROR GOTO 180 
110 “ーー ロッ アロ ビッ Oku ーー 一 
120 INPUT "3 サタ / セイ スウ 9( 十 ) ヲ ニュ リウ リョク シテ クタ "サイ 』”sN 
130 IF FIX(N) く <>N THEN ERROUR 251 
140 EIF N<100 OR N ッ ウッ ツ THEN FRRKOUR 250 
150 PRINT _ USING " く 栖 昔 > 5sN 
160 END 
1 ア 0 “ーー ビビ Or me ヨ ラ ae 一 一 
180 IF ERR=250 THEN PRKINT " 3 リタ トル 100 カラ 999 185 
190 IF ERR=251 THEN PRINT " も * ゅ スウ 八 ニュ ユウ リョ ク テ セ キマ セン 
2Z00 PREINT 
210 RESUME 120 
un 
づ サダ / セイ スウ ( 十 ) ヲ ラ ニュ ウリ ョ ク シテ クタ "サイ の 2 123456 
3 ケタ ト 八 100 カラ 999 11I 





づ ケタ / ノ セイ スウ (+ ) ヲ ニュ ウリ リョク ラテ クタ "サイ 7 54。3 


2 ノー る 81 


ッ ” リズ スウ 八 ニュ リウ リョク テ セ キマ セン 
づ サタ / セイ スウ 9( 二 ) ヲ ニュ ウリ ョ ク シテ クタ "サイ :? 999 


く ツ ウツ > 
Uk 
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EXP 数 値 関数 


e(2.718281) に 対す る 指数 関数 の 値 を 与え ます 。 
EXP( < 数 式 >) 
EーEXP(1) 





s < 数 式 > の 指数 関数 の 値 を 与え ます 。 た だ し , < 数 式 > の 値 が 
87.33655 よ り 大 きい 場合 に は “Over flow エラ ー が 起こ り ま 
3 

・EXP 関数 の 演算 は 単 精度 で 行わ れ ま す 。 


10 “EXP 





20 “-- Make SINHhyperbolic sin) ーー 
3 "で = COSH(hyperbol ic cos) from EXP 一 一 
40 INPUT D 


50 HS=(EXP(D)-EXP( -D) ) /2:HC=(EXP(D )+EXP(-D) )/2 
60 PRINT "SINH" :USING " 拉 折 "Hi:PRINT = jiHS, 
?0 PRINT "COSH" :USING ' 析 手相"3Dj:PRINT = ーーjHC。 
80 ENDU 


? 2 
SINH 2 = 3.。.62686 CUSH 2 = 3。/62Z2 
UK 
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ディ スズ ス 2 


FIELD 





入出 力 ス テー トメ ント 


フラン ダム ファ イル の バッ ファ に 変数 の 領域 を 割り 当て ます 。 
FIELD[ 革 」 く ファ イル 番号 >, く < フィー ルド 幅 > AS < 文字 変数 > 
(, く フィ ー ル ド 幅 > AS < 文字 変数 >…] 


- 例 ) FIELD せ 1. 128 AS A$, 128 AS BS$ 








*・ フ ァイル バッ ファ を ラン ダム ファ イル バッ ファ と し て 使用 
する だ た め に , ファ イル バッ ファ の 中 に 文字 変数 の 領域 を 割り 
当て ます 。 

・ ラ ンダ ム フ ァ イル の 入出 力 を 行う 前 に 必ず , FIELD が 実行 
され て いな けれ ば な り ま せん 。 

*・ く ファ イル 番号 〉? は OPEN に よっ て ファ イル を オー プン し た 
こき に 指定 し た 番号 で す 。 ま た 特に く < ファ イル 番号 〉 が 0 の と 
き DSKI$, DSKO$ に お いて 使用 さき れる ラン ダム バッ ファ を 定 
義 し ます 。 

*・〈 く フィー ルド 幅 > は < 文字 変数 y に 割り 当て る 文字 数 (バイ ト 
数 ) で す 。 バ パッ ファ の 大 き さ は 256 バ イト な の で , 名 文字 変数 
の 〈《 フ ィ ー ル ド 幅 > の 合計 は 256 バ イト 以内 で な けれ ば な り ま 
せん 。 

・ つの バッ ファ に 対し て , 何 回 か に 分 け て EIELD を 実行 
する こと が で きま す 。 

・ FIELD で 指定 し た < 文字 変数 > は 必ず LSET/RSET で 定義 し 
て くだ さい 。 ま た , この 変数 を INPUT, LET の 左辺 で 使用 し 
な いで くだ さい 。 も し 使用 する と , その 変数 は , 一 般 の 文字 
数 数 誤 域 に 登録 され , FIELD で の バッ ファ の 割り 当て が 無効 
こと なり , 止 し い フ ァイル の 入出 力 が 行わ れ な く な り ま す 。 
・FIELD で 指定 し た 変数 は , FIELD を 実行 し た 時 点 で , 指定 
し た 文字 数 の ヌル キャ ラク タ ( ア スキ ー コ ー ド が 0 の キャ ラ 
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グ タ ) が セ 2 ト され ます 。 


OPEN, GET, PUT, LSET/RSET, PC-8001MKITI ユ ー ザ ー ズ マ 


クレ 


100 
110 
120 
130 
140 
1 コ 0 
160 
170 
180 
120 
2Z00 
Z10 
220 
230 
Z40 
2 っ 0 
260 
2Z70 
Z80 
2 ツ 0 


Pr 


DPEN "Ftest。dat AS 1 

FIELD 1.30 AS A ま ,30 AS B*$,30 AS C ま 
"ーー DY ま も 八 A+TB ま + じ も / タメ / タダ "ミー テ “ ス 。 一 一 
FIELD 攻 1.90 AS DY も ,2 AS DD も 。4 AS E ま 。8 AS F ま 
LSET A ま ="NEC-8001MK1]L 

LSET B も = "Peraona1" 

LSET C ま = "Computer 

RSET も ま =MKT も (8001 ) 

RSET 上 まま =MKS ま *( 1 。23456 ) 

RSET F も =MKD ま ( 3. 14159265358979 要 ) 

PUT 幕 4。1 

5ET 林 1 。 1 

PRINT ム A$ 

PRINT B ま $ ょ 

PRINT じ ま も 

D を =CV1(D$) 

E ! =CVS(E*$ ま ) 

F =CVD(F ま ) 

PRINT DZiPRINT E!「iPRINT F 提 

END 


NEC-8001MKJL 


Persaonal 
し じ OmpPu モ e@ ビ 
8001 
1 。2Z3456 
3 。141592653 コ 5897/ ツ 


Uk 
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ティ スク 


FILES/LFILES 人 N| 一 般 コマ ンド 





フロ ッ ピ イィ ディ スク に 入っ て いる ファ イル の 名 前 。 種 類 と 大 
ささ を 表示 し ます 。 

1) FILE[< ド ライ ブ 番 号 >〕 

2) LFILES[< ド ライ ブ プ 番 号 >〕 





FILES 2 





*〈 く ドラ イブ 番号 〉 で 指定 され た , フロ ッ ピ ィ デ ィ ス ク 上 に 登 
慰 さ れ て いる ファ イル の 名 前 , 種類 と その 大 き さ を 表示 し ま 
す 。 

・ 書 式 1 ) の 場合 ディ スプ レイ 画面 に , 2) の 場合 プリ ンタ に 出 
力 し ます 。 

*・〈 ド ライ ブ 番 号 〉 が 省略 され た と き は , ドラ イブ 1 が 選択 さ 
れ ま す 。 

*・ フ ァイル の 種類 は , 出力 され る 〈 フ ァイル 名 >〉 と く 拡張 子 > と 
の 区 切り 文字 に よっ て 表わさ れ ま す 。 区 切り 記号 が 空白 の 場 
合 に は , その ファ イル は アス キー セー プ ブ され だ た プロ グラ ム フ ァ 
イル , また は , OPEN に よっ て 作ら れ た デー タフ ァイル で あ 
る こと を 示し ます 。 区 切り 文字 が , ビリ オド の 場合 に は , バ 
イナ リセ ー ブ に よっ て 作ら れ た ブロ グラ ム フ ァ イル , アス タ 
リス ク の 場合 に は CMD BSAVE に よっ て 作ら れ た 機械 語 プ ロ 
グラ ム フ ァ イル で ある こと を 表し ます 。 

・ フ ァイル の 大 き さ は , ク ラス タ を 単位 と し て 表示 され ます 。 
ミー ニン ロッ ビル デメ スク の リク ラス ク 有 8 セク タダ 。 9 イッ ンチ 
フロ ッ ピ ィ イデ ィ イス ク の 1 クラ スタ は 26 セ クタ で す 。 





SAVE, CMD BSAVE 
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†Tiles 

千 O ビ mat 。 

gp 1b 

ら ar 和 †1 Fe 
3DNM 

da も tage・ne ・ 
じ G ソ 1 いり 8a 。| 
INVADE , R 
lien , 和 al 


Ok 


い ビ ビビ 玉 つ ビビ 


bac に kuP ・ 
table 


timebo mb 


タリ ト か ” 。ー ム 
ba ら = こと Om。 
†ile 
qa1a い ua 
othell.o 


UND ロビ お の で ご 





FIX [MjIN) 数 値 関数 


整数 部 を 与え ます 。 
FIX(< 数 式 > ) 
文 例 ) A ニ FIX(B/5) 


・ < 数 式 > の 値 の 小数 点 以 下 を 取り 去っ た 値 を 与え ます 。 

・EFIX (< 数 式 > ) と INT (< 数 式 > ) の 値 は < 数 式 > の 値 が 正 の と き 
等 し く な り ま す が , 負 と な っ た 場合 FIX 関数 は 小数 部 分 を 
取り 去っ て し まい ます 。 し た が っ て この 場合 は FIX 関数 で 
得 ら れる 値 が INT 関数 で 得 ら れる 値 よ り も 大 きく な り ま す 。 





INT 


100 “-- fix & in 七 一 一 

1 10 = ニー ク 

120 FUR =0 TU 2 

1 3U0 A ニ A+ 上 エミ ※。3 

140 PRKINT "A ="%A。 FIX(A) ="sFIX(A)。 "INT(A) = "INT(A) 





150 NEXT 1 
PF UPF1 

A =ー2 FIX(A) =-2 INT(A) =-2 
A =-1.7 FIX(A) =-1 INT(A) =-2 
A =-1.1 FIX(A) =-1 INT(A) =-2 
A =-.2 FIX(A) = 0 INT(A) =-1 
A = 1 FIX(A) = 1 INT(A) = 1 
A = 2.5 FIX(A) = 2 INT(A) = 2 
A = 4.3 FIX(A) = 4 INT(A) = 4 
A = 6.4 FIX(A) = 6 INT(A) = 6 
A = 8.8 FIX(A) = 8 INT(A) = 8 
A = 11.5 FIX(A) = 11 INT(A) = 11 
Ok 


呈 EOKVYVYWOWOVW9%⑱| ぼ = ほほ tb #※※※wpw9ovk ' ま = 


FOR…TO…STEP-NEXT [Ns 











一 般 ス テー トメ ント 

FOR と NEXT に は さま れ た 一 連 の 命令 を 指定 回 数 だ け 操 | 
返し 実行 し ます 。 
FOR< 変 数 > ニ < 初 期 値 > TO < 終値 >〔STEP< 増 分 >〕 

( 
NEXT[< 変 数 >[, < 変数 >…〕]〕 
FOR 10 TO 50 STEP 2 

) 
NEXT | 





・ < 変数 〉 は 制御 変数 と 呼ば れ , ルー プ の カウ ンタ と し て 使わ 
れ ま す 。 

・ く (変数 〉 は 整数 変数 単 精度 変数 の み 使 用 で きま す 。 文字 変 
数 、 倍 精度 変数 は 使用 で きま せん 。 

・ < 初期 値 〉。 < 終値 〉, < 増分 > は 数 式 で す 。 

・FOR 一 NEXT の 動作 は 次 の よう に な り ま す 。 

ます < 変数 > に < 初期 値 〉 が 設定 され , FOR 以後 か ら そ れ に 対 
応 す る NEXT まで 実行 され ます 。 そ し て STEP に よっ て 指定 
され た < 増分 > を < 変数 > に 加え , そ れ を 新しい < 変数 y と し ます 。 
次 に < 変数 > の 値 が < 終値 > と 比べ られ , < 終値 > に 達し て いな け 
れ ば , FOR の 次 の 文 へ 戻り , 同じ 処理 が 操り 返さ れ ま す 。 
これ を FOR 一 NEXT ルー プ と 呼び ます 。STEP が 省略 され た 
場合 < 増分 >? は 十 1 と みな され ます 。 ま た < 増分 > は 負 の 値 を と 
る こと も で きま す 。 こ の と き < 初 期 値 >? は , < 終値 > より 大 きく 
し な けれ ば な り ま せん 。 こ の 場合 < 変数 > が < 終値 > より も 小さ 
く な る まで FOR 一 NEXT ルー プ が 操り 返さ れ ま す 。 

・ 次 の 場合 FOR--NEXT エ ルー プ は 1 回 だ け 実 行 さ きれ ま す 。 

1) < 間 分 > が 正 の 値 で , <《 初 期 値 > が < 終値 > より 大 きい 場合 。 


we ゲ 
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2) < 増分 > が 負 の 値 で , 《 初 期 値 > が < 終値 > より 小さ い 場 合 。 
3) < 初期 値 〉> と < 終値 > が 同じ 値 で < 増分 〉 が 0 の 場合 。 
但し , < 変数 > に は < 初 期 値 〉 が 代入 され て いま す 。 
・FOR 一 NEXT ルー プ は 入れ 子 構造 に する こと が で きま す 。 
これ は 1 つの FOR 一 NEXT ルー プ の 中 に も う 1 つの FOR 一 
NEXT ルー フ を 置く こと が で きる と いう こと で す 。 この と き , 
それ ぞ れ の < 変数 〉 は 別 の も の を 使わ な けれ ば な り ま せん 。 

・ 1 つの FOR に 対し て , 入れ 子 構造 さえ 正しけれ ば , NEX] 
は いく つ あ っ て も か まい ませ ん 。 





100 CMD SCREEN 3,,6:CMD CLS 3 
110 FOUR R=10 TO 200 STEP 20 
1Z0 FOR =0 TO 3.14 STEP .,05 
1 30 Y=SIN( i )xCOS( 1 ) 

140 X=SIN(T)xSIN(I ) 

1 コ 0 Y=Y%KR+100 

160 三 (XX※ 民 ※2。5+100-C)/2 
170 CMD PSET(X。Y) 

180 NEXT 1 

190 し = じ +10 

2Z00 NEXT R 

2Z10 END 
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FORMAT [IIN) 特殊 コマ ンド 


ミニ フロ ッ ピ ィ デ ィ ス ク を 初期 化 ( フ ォ ー マ ッ ト ) し ます 。 
FORMAT〔 く < ドライブ 番号 >〕 
FORMAT 


・FORMAT は , DISK-BASIC を 使用 する 場合 に は 通常 使う 必 
要 は あり ませ ん 。 逆 に FORMAT に よっ て 重要 な デー タ を 消 
し て し まう 危 検 性 も あり ます か ら 使 わな い 方 が よい で し ょ 
う 。 フ ロッ ピ ィ ディ スク を 初期 化す る 場合 は , シス テム ディ 
スク に 入っ て いる “format' と いう ユー ティ リティ ブロ グラ ム 
を 使用 し て くだ さい 。 

・FORMAT は ,。 ミニ フロ ッ ピ ィ デ ィ ス ク の 初期 化 を 行い ま 
す 。 しかし, FORMAT を 実行 し た フロ ッ ピ ィ イデ ィ ス ク は , 
FAT , ディ レク トリ , D の 初期 化 は 行わ れ て いま せん か ら 
DISK-BACIC 用 に 使う こと は で きま せん 。DISK_-BACIC か ら 実 
行 で きる の は DSKI$, DSKO$ だ け で す 。 





1. FORMAT を 実行 する と その フロ ッ ピ ィ デ ィ ス ク に 書き 
込ま れ て いた ファ イル は すべ て 消去 され ます 。 し た が っ て 。, 

要 な ファ イル が 書き 込ま れ て いる フロ ッ ピ ィ デ ィ ス ク に 
対し て FORMAT を し な いよ うに 注意 し て くだ さい 。 

2. FORMAT が 使用 で きる の は イン テリ ジェ ント タイ プ の 
回 ツメ ディ スク ラコ ショ ッ ト だり で すき 。 

3. NsoDISK-BASIC に は FORMAT に 相当 する 命令 は 用 意 さ 
れ て いま せん 。 フ ロッ ピ ィ ディ スク を 初期 化す る に は , シ 
ステ ム デ ィ ス ク に 入っ て いる “formatN80” を 使用 し て く 
だ さい 。 











Tormat 2 
Uk 
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FPOS [sl 入出 力 関数 








ファ イル 中 で の 物理 的 な 現在 位置 を 与え ます 。 
FPOS(< フ ァイル 番号 > ) 
HDFPOS( 2 ) 


*〈 フ ァイル 番号 >? に よっ て 指定 され た ファ イル が 最後 に 読み 
書き し た フロ ッ ピ ィ デ ィ ス ク 上 の 物理 的 な 位置 を 返し ます 。 
この 番号 は , トラ ッ ク 0, ヘッ ド 0, セク タ 1 を 0 番 と し た 
こき の 通し 番号 で 与え られ ます 。 


LOC 


100 “一 - fpos value pFin 上 out 一 一 
110 OPEN "2:data6'" FOR OUTPUT AS 昔 1 
120 PRKINT FPOS( 1 ) : PR INT 

130 FOR 1I=1 TO 5 

140 PRINT ##1。STRING ま (128。"1"*) 
150 PRINT #1.STRING ま (128。"1*) 
160 PRINT FPOS( 1 ) 

170 NEXT 1 

180 CLOSE 昔 1 

に じい ロ 


120 


1 22 
1 Z づ 
124 
1 2 っ 
126 
0k 


2 ノー92 


FRE 特殊 関数 











メ モリ の 未 使用 領域 の 大 き さ を 与え ます 。 

FRE( < 機能 >) 

PRINT FRE(0 ) 

・ < 機能 > が 数 値 型 で あれ ば メモ リ の 未 使 用 領域 の 大 き さ を , 
文字 型 で あれ ば 未 使用 の 文字 領域 の 大 き さ を バイ ト 数 で 返し 
ます 。 


100 CLEAR 300,&HDO00 
110 PRINT ' フ "ロク" ラム リョ 9 イキ AFRE(0) "byte free テ * ス ^ 


120 PRINT も モ シ "ルツ リョ ウイ キ 人 "jFRE("a") "byte Tree テ " ス 


un 

フ ” ロ グ ク ” ラム リョ ウイ キ AA Z0024 byte 和 †f ヒ Cee テ " ス 
モラ >” ルツ リョ リ イ キ 八 300 byte Tree テ " ス 
Uk 


ディ スク 


入出 力 ス テー トメ ント 


GET 





ラフ ラン ダム アク セス ファ イル の デー タ を バッ ファ に 読み 込み ま 
す 。 

GET[ # 」 < ファ イル 番号 >[, く レコ ー ド 番号 >〕 

GET せ 3,. 5 


*・ く < ファ イル 番号 〉 で 指定 され た ファ イル 中 の デー タ を , 対応 
する バッ ファ の 中 に 読み 込み ます 。 指定 され た ファ イル は ラ 
ンダ ム ア ク セス の モー ド で オー プン され て いな けれ ば な り ま 
せん 。 

*・〈 レ コー ド 番 号 〉? は ファ イル の レコ ー ド 番号 で , 指定 され た 
レコ ー ド (256 バ イト ) が バッ ファ に 読み 込ま れ ま す 。 レ コー 
ド 番 号 が 省略 され た 場合 に は , 直前 に 行わ れ た , GET. PUT 
で 指定 され た レコ ー ド の 次 の レコ ー ド が 読み 込ま れ ま す 。 

・ GET を 実行 し た 後 INPUT #, LINE INPUT 等 で 同一 の 
〈 フ ァイル 番号 〉 を 指定 する と , その バッ ファ に 入っ て いる 
ゲー タダ から 入力 が 行わ れ ま す の で 注意 し て くだ さい 。 

・GET は バッ ファ の 読み 込み を 行なう も の で す 。 変数 に 
GET し た デー タ を 割り 付け る に は , FIELD を 用 いま す 。 





OPEN., FIELD, PUT, PC-8001MKIH ユ ー ザ ー ズ マニ ュ ア ル 第 8 


人 


ーー 








100 “-- random data read 一 一 

110 OPEN "1:data1" AS 1 

120 FIELU 1.30 AS A ま ,20 AS B ま も 。50 AS C ま 
130 5ET 1。1 

140 PRINT "NAME " 。A$ 

150 PRINT “TEL ',B$ 

160 PRINT "ADDRESS " ,C*$ 

170 CLOSE 

ビ un 

NAME アラ イ マサ ヨ 

TEL 03-876-5432 

ADDRESS トウ キョ ウ ト シフ " ヤ ク アオ ヤマ 3 チョ ウメ 
Uk 





グラ フィ ックス テー トメ ント 


テキ スト 画面 上 の 任意 の 範囲 の キャ ラク タ ま た は , 低 解 像 度 
グラ フィ ッ ク パ ター ン を 配列 ヘ セ ー フ し ます 。 

1) GET[L@](X1, Y1) 一 (X2, Y2), < 配列 名 〉 

) GET[@](Lx1, Ly1) 一 (Lx >, Ly2)。 < 配列 名 >。 G 

3) GET[@]JA (X1, Y1) 一 (X2, Y2), < 配列 名 > 
“ " 
9 








2 


ー の 


GET@(10, 10) 一 (35, 19)、 A 多 
GET@(5, 5) 一 (50, 60), B め , G 
GET@(5, 5) 一 (14, 14),C 多 





NO 


う 


1) キャ ラク タ 座 標 に お いて (Xi. Y) と (X。, Y。) を 対角線 と 
する 四角 形 の 内 側 に 表示 され て いる キャ ラク タ を 配列 へ 
セー ブ し ます 。 こ の 場合 の 水平 位置 Xi, X。 は 0 一 ( 1 行 の 
桁 数 ) 一 1 まで の 値 , 垂直 位置 Y,, Y。 は 0 一 ( 1 画面 の 行 
数 ) 一 ] まで の 値 で 指定 し , 配列 の 添字 の 値 は 次 の よう に 
が 0 ます 。 





< 添字 の 値 ? ニ (キャ ラク タ 単 位 で 計っ た 面積 /N) 一 1 
N は 整数 型 配列 で 2, 実数 型 配列 で 4 , 億 精 度 型 配列 で 8 
0 まま 
2) 低 解 像 度 グ ラフ ィ ッ ク 座 標 に お いて (Lx, Ly,) と (Lx,, Ly,) 

を 対角線 と する 四角 形 の 内 側 に 表示 され て いる 低 解 像 度 グ 
ラフ ィ ッ ク パ ター ン を 配列 に セー ブ し ます 。 こ の 場合 の 水 
平 位置 Lx , Lx は 0 一 (1 行 の 桁 数 )X 2 一 1 まで の 値 , 垂 

直 位 置 Ly,, Ly。 は 0 一 ( 2 画面 の 行 数 )X 4 一 1 まで の 値 を 
と り ま す 。 配列 の 添字 の 値 は 次 の よう に な り ま す 。 

< 添字 の 値 >= ニ (ビク セル 単位 で 計っ た 面積 /8 十 2 ) /N 


N は 先程 の キャ ラク クタ の 場合 と 同じ で す 。 


2-95 











3) キャ ラク タ て と 低 解 像 度 グ ラフ ィ ッ ク パ ター ン , ある い は 
色 や 機能 の 異な る 画面 上 の デー タ を 配列 に セー ブ し ます 。 
座標 の 指定 は 書式 1) の 場合 と 同じ で , 配列 の 添字 の 値 は 次 
の の に なり ます 。 





< 交 字 の 値 > 三 (キャ ラク タ 単 位 で 計っ た 面積 /N ) * 2 一 1 


この と き の N も 先程 と 同じ で す 。 
PUT (@ 


100 MIDTH 80,25 

110 CONSOLE 」,。1 

120 COLOR 4,0,1 

130 DIM 6 を (100 ) 

140 LINE(0,0)-(10。10) ,PSET 。BF 

150 5ETG(0.0)-(10。10).6%。6 

160 PUT@(100,50 )-(110。60 ) ,6 と 。PSET 
170 END 


GOSUB--RETURN |NJIN| 一 般 ス テー トメ ント 








サブ ルー チン の コー ル ,。 及び サブ ルー チン か ら の リタ ー ン を 
行い ます 。 

GOSUB< 行 番号 > 

GOSUB 1000 


・ < 行 番号 > か ら 始 まる サブ ルー チン プロ グラ ム を GOSUB に 
よっ て コー ル し , サブ ルー チン ブロ グラ ム 内 の RETURN に 
よっ て , GOSUB の 次 の 文 へ ヘリ ター ン し ます 。 

s サ プル ー チ ナン フ ログ ラム と は , 独立 し た プロ グラ ム で . 
RETURN で 終っ て いる も の を いい ます 。 これら は GOSUB に 
よっ て , いつ で も 何 度 で も コー ル す る こと が で きま す 。 

・] つの サブ ルー チン の 中 か ら 他 の サブ ルー チン を コー ル す 
る こと も で き , これ を サブ ルー チン の 多重 化 ( ネ ステ ィング ) 
と 呼び ます 。 こ の 多重 化 は メモ リ の スタ ッ ク 領 域 の 容量 が 許 
す 限 り 行う こと が で きま す 。 も し , スタ ッ ク 領 域 が 足り な く 
な っ た 場合 に は “Out of memory"” エラ ー が 起こ り ま す 。 

・ サ ブル ー チ ン は 必ず GOSUB に よっ て コー ル さ れ な けれ ば 
な り ま せん 。 も し , 単独 で 実行 し た 場合 , RETURN に 出 会 
うこ , “RETURN without GOSUB" エラ ー が 起り ます 。 

・1 つ の サブ ルー チン 内 に 複数 の RETURN が あっ て も か ま 
いま せん が , 正しく GOSUB と 対応 し て いな けれ ば な り ま せ 
ん 。 


"GO" と "SUB" の 間 に ス ペー ス を 書い た 場合 , BASIC は それ 


を GOSUB と は 解釈 し ませ ん 。 


100 “ーー- サン カク サイ / ノ メン セキ ヲ モト メ 上 ルル ーー 
110  -- ar 一 一 

120 INPUT “テイ ヘン 』" :BA 
130 INPUT "タカ サー : "5 日 
140 GUSUB 190 

150 PRINT "メン セキ ル " AR 
160 PRINT 

170 GOTO 120 

180 “-- menseki - 一 

1 90 AR=BAXH/2 

200 RETURN 


PHFT 

テイ バン 2 78 
タカ サ 。 s?⑦? 8 
メン セキ 八 312 





テイ ペン si⑦ 100 
タカ サ ー k? 30 
メン セキ 内 1500 


テイ ヘン 2 10000 
タカ サ ji? 7890 
メン セキ ハハ 3.945E+0D7 


ナイ ヘン si の? 
Break in 120 
U ト 


GOTO/GO TO 一 般 ス テー トメ ント 











指定 し た 行 へ 無 条 件 に ジャ ンプ し ます 。 
1) GOTO< 行 番号 > 

2) GO TO< 行 番号 > 

GOTO 500 


・< 行 番号 〉 で 指定 し た 行 へ 無 条 件 に ジャ ンプ し ます 。 書 式 1), 
2) は 全く 同じ 機能 で す 。 


“GO" と “TO" の 間 に 2 個 以 上 の スペ ー ス を 書い た 場合 BASIC 


は それ を GOTO と は 解 釈 し ませ ん 。 


100 ーー 上 a ビ 二 一 一 
110 PRINT “Hou do you do?" 
12Z0 5UTO 110 


PH 


HOu 
HOu ぃ 
Hou 
Hou 
HOwM 
Hou 
Hou 
Hou 


し 


dO 
fe【e 
dO 
do 
dO 
do 
do 
dO 


ァ ひい 
ァ 〇 
ァ アロ 
ァ ロ 
アァ ウロ 
ァ O 遇 


OO 


OO 


do 
do っ ? 
do? 
do? 
do ツ 
do 
do 
do? 


Break in 110 
Uk 


HEX$ 





N) 文字 関数 


10 進 数 を 16 進 数 の 文字 列 に 変換 し ます 。 
HEX$( く 数 式 >) 
PRINT HEX$(H) 


* < 数 式 > の 値 を 16 進 数 に 変換 し て , その 文字 列 を 与え る 関数 
3 
・< 数 式 > の 値 は , 一 32768 一 32767( ま た は 0 一 65535) ま で で 


す 。 ま た , < 数 式 〉 に 小数 点 が 含ま れる 場合 , 小数 点 以 下 を 切 
捨て ます 。 

100 “-- 10 シン <--> 16 ミン ヘン カン ヒョウ ーー 

110 PRINT -0 -1 -2 -3 -4 -5 -6 -7 -8 -9 
12Z0 FOR I=O0 TO 9 

1 30 PRKINT STR も ( エ ) ょ 5 どー 。 

140 FOR J=0U TO 9 

150 PRKIN「 RIGHT ま ("0 "+HEX も (Tx10+J) 2 7 "5 
160 NEXT] J 

1 /U PRINT 

180 NEXT 1 

190 END 

PtJfT1 

-0 -1 -2 -3 -4 -5 -6 -? -8 -9 
0- OO 0G1 02 03 04 05 06 07 08 09 


店 
ウニ 
う 3- 
人 
ーー 
ら ー 
フー 
ee 
りー 
Uk 


14 15 16 17 18 19 1A 1B 1C 1D 
1E 1F 20 21 22 23 24 25 26 27 


32 33 34 35 36 37 38 39 3A 3B 
3C 3D 3E 3F 40 41 42 43 44 45 
46 47 48 49 4A 4B 4C 4D 4E 4F 


5A 5B 5C 5D 5E 5F 6 る 0 6 る 1 2 る 3 
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IF…THEN…ELSE/IF…GOTO…ELSE 











一 般 ス テー トメ ント 


論理 式 の 条件 判断 を 行い 次 に 実行 する 文 を 選択 し ます 。 
IF< 論 理 式 > if ベ 衣 > | 中 人 < 文 > 





号 > < 行 番号 > 
GOTO < 行 番号 > 


IF A$ や ー" ツ ” THEN 200 ELSE END 











。 論理 式 の 条件 に よっ て プロ グラ ム の 実行 を 制御 し ます 。 

・ < 論理 式 > が 真 ( 0 以外 ) な ら ば THEN また は GOTO 以降 を 
実行 し 。 偽 (0) な ら ば ELSE 以降 が 実行 さき まれ ます 。 も し 
ELSE 導き れ て いる 場合 。 次 の 行か ら 実 行 さ れ ま す 。 
・IF…THEN…ELSE に お いて , THEN や ELSE に 続け て 別 の 
IF を 置い て 多重 に する こと が で きま す 。 も し IEF の 中 の 
THEN と ELSE の 個数 が 異な る と き ELSE は , 最も 近く に あ 
り 他 の ELSE と 対応 し て いな い THEN に 対応 し ます 。 但 し, 

多重 で きる の は 1 行 (255 文 字 に 書け る 範囲 ) に 限ら れ ま す 。 


100 “-- real or 1magd1inar レ y ー-ー 一 
110 INPUT ゐ ぬ 
1 20 FL=U 
130 IF A<0 THEN A=ABS(A):FL し =1 
140 PRINT SQR(A)i 
150 IF FL THEN PRINT "」 ELSE PRINT 
160 END 
100  -- real or 1mag1nar ッ ーー 
110 INPUT A 
120 FL=0 
130 IF A<0O THEN A=ABS(A) FL =1 
140 PRINT SQR(A 7) 
150 jF FL THEN PRINT "1 ELSE PRINT 
1 60 END 
に い ロ 
2 細 
ノ .23607 
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INIT% 








入出 力 ス テー トメ ント 


RS-232C 通信 ポー ト を 初期 設定 (イニ シャ ライ ズ ) し ます 。 
INIT 欠 < ポー ト 番 号 >,。 < モー ド >。 < コマ ンド > 
INIT 如 1 &HFB, &H37 


・〈 ポ ー ト 番号 > で 指定 され た RS-232C 通信 ポー ト の 入出 
カカ バッファ の イニ シャ ライ ズ を 行い ます 。 MKI 本 体 に 内 蔵 
され て いる RS-232C イン タフ ェ ー ス を 使用 する 場合 , < ポー 
ト 番号 〉 は 1 を 指定 し ます 。 

・ く モー ド > と 〈 く コマ ンド 〉> は ブロ グラ マブ ル ・ コ ミュ ニケ ー シ 
ョ ン イ ンタ フェ ー ス 〆PD8251C の 動作 を 指定 し ます 。 

・ イ ニシ ャ ライ ズ を 行っ て いな い 状 態 で RS.232C イン タ 
フェ ー ス を 使用 する と , “Port not initialized" エ ラー が 起こ り 
ます 。 

・/PD8251C の く < モード > とく 〈 コ マン ド 〉 は 次 の よう に それ ぞ 
れ 8 ビッ ト の デー タ を 設定 し ます 。 

< モー ド 〉 

非同期 モー ド 


D? D。 Di D4 Di Ds Di Di 


slslgplmwrrlsll 





1: イ ネー プル 

U り 0: ディ ネス エイ ブル 
偶数 パリ ティ 発生 / チ ェ ッ ク 
1 : 偶数 0: 奇数 
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同期 モー ド 
D, D。 Ds D4 Ds D ぅ 2 Di D。 








ッ パ 日 の es イ ネー ブル 
1 : イネ ー ブ ル 
0 : ディ スエ イプ ブ プル 


人 箇 数 パリ ティ 発生 / チ ェ ッ ク 
1 : 偶数 0 : 奇数 

外部 同期 検出 
1 : SYNDET テ 入力 
0 : SYNDET テ 出力 

単 一 キャ ラク タ 同 期 

1] : 単 一 SYNC キャ ラク タ 
0 : ダブ ル SYNC キ ャ ラク タ 


< マンド) 


D? De Ds DU。 Ds Ds D」 D。 


ーー 送信 イネ ー プ ブル 
1: イネ ー プ ブル 
0 : ディ スエ イプ ブル 
バー クリ クー ナル ルル アタ 
1 : Data Terminal Ready を ON に する 
0 : NO OPERATION 
- 受 信 イ ネー プル 
#』 イネーブル 
0: デブ ィ ス イ エイ ブル 
セン ドブ レイ ク ・ キ ャ ラク タ 
1 : プレ イク キャ ラク タ の 送信 
0 : 通常 動作 
ーー エ フー リセ モッ ト 
1 : エ フー フラ グ (PE, OE, FE) を リセ ッ ト 
0 : NO OPERATION 
セン ド 要 求 
1 : Roquest to Sond を ON に する 
0 : NO OPERATION 
内 部 リセ ッ ト 
1 : 8251 を モー ド ・ イ ンス トラ クシ ョ ン フ ォ 
モジ UNRNWd 
0 : NO OPERATION 
HUNT 
1 : SYNC キャ ラク タ の 検出 を 始め る 
0 : NO OPERATION 
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100 
110 
120 
1 30 
140 
150 
160 
170 
180 
1?0 
Z00 
Z10 
ZZ0 
2Z30 
240 
2 っ 0 
260 
Z/0 
ZB0 
2?0 
300 


310 ^ 


320 
330 


"Jump て table set 
PUKE &H8001 ,&H23:POKE &H8000 。&H7F 
_ 1nteFFup セ t enab]e 
OUT &HE6。4 
"で C り どじ @n 七 上 a 上 uS じ egi ら terF ら e セ 
UUT &HE4,&HFF 
- モー ト * "イト : ス トリ ウフ ヒ Y ッ ト 2 
- ミク "ウス ウ 敗 ? リ ティ 
3 八 " リティ イネ ー ブ プア " 引 
3 キャ ラク タダ チョ ウ アァ 
ホホ" 一 レイ ト フ ブ ァ クタ ※16 
コマ ント "ルイ ト : セ ント" ヨウ キュ ウ DON 
エフ ラー リセ リト 
ミシン ” ュ シン イネ ー フ "人 
テー タ タダ ターミ ナル レティ 
1 ソウ シン イネ ー フ ブル 
JNIT 21.&HFA。&H37 
IF PORT(1) THEN PRINT INPUT ま (PORT( 1 ) 。 を 1 ) : 
じゃ =INKEY ま も:TF C ま く >" | THEN PRINT 1。C ま も: 
GOTO 270 
” 美 沈 半 洋洋 類 光 光 基 革 甘 基 光 区 区 区 基 光 甘 区 区 区 区 区 光 天 区 贅 区 
フロ グ ク ” ラム シュ ウリ ョ ウ ココ " Out &hES。&h0O 
ブ シ " り コウ シテ クタ "サイ 。 
壮 甘 革 光 基 光 洋光 区 光 区 区 光 区 区 区 光 天 天天 区 光 贅 区 


1 1 に に] 1 ] 1 電 
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INKEY$ IM 文字 関数 


機能) キー が 押さ れ て いれ ば , そ の 文字 を , 押さ れ て いな けれ ば ヌ 
ルス トリ ング を 与え ます 。 


INKEYS 
A$ ニ INKEYS 


・ キ ー 入 力 が あれ ば , その 文字 を 返し ます 。 た だ し , キー 入 
力 さ れ た 文字 は 画面 に 表示 され ませ ん 。 
・[CTRLT[C] と [STOP] キ ー は INKEY$ 関数 に よっ て 拾う こと 
は で きま せん 。 


100 PRINT “Enter any key to end 。。 
110 “1]oop 

120 Ab=INKEY 和 ま 

1 30 IF A ま =”” THEN 120 

140 PRINT A*$ 

150 IF A ま ="e= THEN 160 ELSE 120 
155 “exit 

160 END 

PT1 

Enter any key to end ・+ 





し 選 
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INP 特殊 関数 








入力 ボート か ら 値 を 得 ます 。 
INP(</O ア ドレ ス >) 
A 三 INP(0) 


・〈1/O ア ドレ ス > で 指定 され た 入力 ポー ト か ら 8 ビッ ト の 
デー タ を 読み 込み 、 それ を 関数 の 値 と し ます 。 

・〈I/O ア ドレ ス 〉 と し て 指定 で きる 値 の 範囲 は 0 一 255 ま で 
3 


OUT, PC8001MKI ユ ー ザ ー ズ マニ ュ ア ル 付 録 9 I/O マ ッ プ 


100 PRINT "Type "se key to end 。。" 
110 "loop 

1ZU0 IF INP(2)=223 THEN END 

130 UM も = TINPUT ま ( 1 ) sPRINT UM$ 

140 GOUTO 120 

に い n 

Type e key to end 。。 


〇 つゆ OUTp 
二 
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INPUT 
能 


N。 入出 力 ス テー トメ ント 





キー ボー ド よ り 入 力 し た デー タ を 指定 し た 変数 に 代入 し ま 
す 。 

INPUT[“ で プロ ンプ ト 文 ツ j』 < 変数 名 >[, < 変数 名 >…〕 
INPUT “DATA" : A$ 


・INPUT 文 が 実行 され る と , 画面 に 疑問 符 (? ) と 1 杵 の ス 
ペー ス を 表示 し , キー ボー ド か ら の 入力 待ち の 状態 に な り ま 
す 。 この と きぐ フロ ン フ ト 文 が ある 場合 . ぐ プロンプト 文 ?> 
に 続い て 疑問 符 を 表示 し ます 。 

・ デ ー タ は [RETURNI キ ー を 押す こと に よっ て 入力 され , 変 
数 に 代入 され ます 。< 変 数 名 > を コン マ で 区 切っ て 複数 個 指 
定 し た 場合 に は , 入力 する デー タ も コン マ で 区 切っ て (変数 
名 〉 の 数 だ け 入力 する か , 1 つ ず つ NIRETURN| キー を 押し て 入 
力 し ます 。 こ の 場合 , 2 回 目 か ら は "? ? "が 表示 され 入力 待 
ちら どり ます 。 

・ < 変数 名 > と 入力 され た デー タ と の 型 と 数 が 一 致し な か っ た 
と き に は , “Redo from start" と 表示 し , 再び 入力 待ち に な り 
ます 。 ま た , デー タ が < 変数 > の 個数 より 多い 場合 に は "Extra 
ignored′ と 表示 し , 次 の 文 か ら 実 行 が 続け られ ます 。 
*IRETURNI キ ー だ け を 押し た 場合 , 変数 は 現在 の 値 が 採用 
され ます 。 し た が っ て INPUT を 実行 する 直前 と 変わ り ま せ 
Le 

・ 文 字 変数 に 文字 列 を 代入 する 場合 . コン マ や 文字 列 の 前 後 
の 意味 の ある 空白 を 入力 し た いと き は , ダブ ルク ォ ー テ ー シ ジ 
ョ ンマ ー ク ( ” ) で 文字 列 を 囲む 必要 が あり ます 。 こ の 場合 
は 文字 列 と し て 引用 符 を 入力 する こと は で きま せん 。 
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100 INPUT "ナマ 1 "'jNA$ 
110 INPUT セイ ベツ "SE も 

120 INPUT “ネン ルイ "0D 

130 PRINT “ナマ ェ _?NA ま 
140 PRKINT セイ ^ ヘ "ツー 』 "GE まま 

150 PRINT “ネン レイ  : "530D: "サイ " 
PHF1 

ナマ エ ? り タ ナ ヘ へ "クン 

セイ ヘ へ "ツー? オト コ 

ネン レイ ?Z 敗 夕 チ 

ZRedo 和 †FOom モモ ョ ヒモ 

ネン ルイ ? 20 

ナマ エ ワタ ナハ "クン 

セイ ヘー ツ オト ] 

ネン レイ  : 20 サイ 

Uk 


FT 下 還 エ . 


: エ 」 


2-108 


INPUT 











入出 力 ス テー トメ ント 





シー ケン シャ ルフ ァイル か ら デ ー タ を 読み 込み ます 。 
INPUT 半 < ファ イル 番号 >, < 変数 > し < 変数 >…〕 

< ファ イル 番号 > が -15 の 場合 は 
INPUT せ 1 A, B 


*INPUT が キー ボー ド か ら デ ー タ を 読み 込ん だ の に 対し , 

INPUT 井 は , フロ ッ ピ ィ イィ ディス ク と カセ ッ ト テ ー プ に 書き 込 
まれ た シー ケン シャ ルフ ァイル か ら デ ー タ を 読み 込み ます 。 

s フ ロッ ピ ィ ディス ク の 場合 ,、 < ファ イル 番号 〉 は , 対象 と な 
る シー ケン シャ ルフ ァイル を , OPEN に よっ て オー ブン し た 
と き に 指定 し た 〈 フ ァイル 番号 〉 と 一 致し な けれ ば な り ま せ 
ん 。 こ の と き <〈《 フ ァイル 番号 >〉> は, 1 一 15 の 値 を と り ま す 。 

* カ セッ ト テ ー ブ で は , ファ イル を オー フン する こと は 必要 
あり ませ ん 。 こ の 場合 く フ ァイル 番号 > は 一 1 に 固定 され て い 
まま 9 

・INPUT 半 で 読み 込む データ は , PRINT 韻 , PRINT 半 
USING で 書き 込ん だ も の で す 。INPUT の < 変数 > の 並び は, 
書き 込み 時 の デー タ の 形 と 一 致し て いな けれ ば な り ま せん 。 


OPEN. PRIN 韻 . PRINT 韻 USING. 付録 A. PC-8001MKIH ユー 
hs マラ アル 


100 “-- ョ equen も tial data read 一 
110 OPEN "test.da モ "FOR INPUT AG#1 
120 “ input da ョ ta 

130 IF EOF(1) THEN END 

140 INPUT 電 1 。 ム ま 

150 PRINT A$ 

160 GUTU 130 

170 END 

ビ い Un 

CAT 

DOG 

HURSE 

SHEEP 

MOUUSE 

Uk 
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INPUT$ INj 入出 力 関数 





キー ボー ド 。 フ ァイル または, バッ ファ より 指定 され た 長 
さ の 文字 を 与え ます 。 
INPUT$( く 文字 数 >[, |[ 半 ] く ファ イル 番号 | ]) 
< ポー ト 番 号 > 時 
ファ イル 番号 が セー-15 の 場合 は |s| 
(文例) CM$ ニ INPUTS( 6) 
解 説 ・ < 文字 数 > は 0 一 255 の 範囲 で な けれ ば な り ま せん 。 


・〈 フ ァイル 番号 〉 が 省略 され た 場合 に は , キー ボー ド か ら 指 
定 さ れ た < 文字 数 > だけ 読 み 込み ます 。 こ の と き 入 力 さ れ た 文 
子 は 画面 に 表示 され ませ ん 。 

・〈 フ ァイル 番号 〉 が 指定 され る と , ファ イル か らく < 文字 数 > 分 
の 文字 列 を 読み 出し ます 。 ま た , 〈 ポ ー ト 番号 〉 を 指定 する と 
RS-232C の バッ ファ より < 文字 数 > 分 の 文字 列 を 読み 出し ま 
す 。 

・INPUT$ は 指定 され た < 文字 数 > の 文字 が 入力 され る の を 待 
らち 続け ま す が , 既に バッ ファ に 入力 済み の デー タ が ある 場合 
に は , バッ ファ の 先頭 か ら 文 字 を 拾っ て きま す 。 ま た 
INPUT は , キー, [CTRL| + [C] を 除く すべ て 
の 文字 を その まま 読み 出し ます の で , INPUT や LINE INPUT 
で は 入力 する こと の で き な し 改行 文字 等 も 入力 する こと が で 
きま す 。 


INPUT. LINE INPUT 


( ン グ ラム. 100 “-- get key 一 
110 FOR =1 TO 5 
120 A 呈 =INPUT ま ([) 
130 PRKINT ム $ 
140 NEXT 1 
150 END 
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PUHf1 


bc 
8bcd 
abcqde 
0Uk 
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INPUT 入出 力 ス テー トメ ント 





RS-232C 通信 ポー ト の 入出 力 バ ッ フ ァ か ら デ ー タ を 入力 し 
ます 。 

INPUT 究 < ボー ト 番 号 >, < 変数 名 >〔, < 変数 名 >… 
INPUT21, A$ 


・〈 バ ポー ト 番 号 〉> で 指定 され た RS-232C 通信 ポー ト の 入出 力 
バッ ファ より デー タ を 入力 し , そ の 値 を < 変数 名 > で 指定 され 
る 変数 に 代入 し ます 。 こ の と き MKI 内 蔵 の RS-232C イン タ 
フェ ー ス を 使用 する 場合 , く < ポー ト 番 号 〉 は 1 を 指定 し ます 。 
・ 人 入力 され る デー タ は CR,LF で 区 切ら れ ま す 。 バ ッ フ ァ の 
元 頭 か ら こ の 区 切り を さがし , 区 切り が 見 つか っ た と ころ で , 
それ ら を 人 秋 数 に 代入 し ます 。 も し , バッ ファ 内 に CR,LF が 
な けれ は RS-232C チャ ネル を 通し て この 区 切り が 入力 され 
る まで 待ち ます 。 


PRINT %, INIT %, PORT 


100 "input 移 て es も 

110 POKE &H8001 ,&H23:POKE &H8000 。&H7F 
120 OUT &HE6。4 

130 UUT &HE4 。&HFF 

140 INIT 系 1。&HFA。&H37 

150 INPUT 1 。A ま $ 

160 IF A ま = "end" THEN OUT &HE6。0:END 
170 PRINT A$ 

180 GOUTO 150 
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文字 関数 


文字 列 の 中 か ら 任 意 の 文字 列 を 捜し 。 その 文字 の 位置 を 与え 
ます 。 

INSTR( [< 数 式 >, < 文字 列 化 , < 訪 字 列 2>) 

AINSTR(A$, “cmd"”) 


s < 文字 列 1〉> の 中 か らく < 文字 列 2 > を 探し 。 見 つか れ ば その 位 
置 を 与え ます 。 こ の と き < 数 式 > は 援 し 始め る 位置 を 指定 し , 

省略 し た 場合 は , < 文字 列 1 > の 先頭 か ら 探し 始め ます 。 

・ < 文字 列 2> が 見 つか ら な か っ た と き , < 文字 列 1 > が ヌル ス 
トリ ング で あっ た と き , < 数 式 >〉 が < 文字 列 1> の 長 さ より 大 き 
い 場 合 0 を 値 と し て 返し ます 。 

・ < 文字 列 2> に ヌル スト リン グ を 指定 する と , < 数 式 > と 同じ 
値 を 返し ます 。 


100 “-- alphabet search -- 

110 A も ="abcdefghi 」 に 1 mnoPD コ トビ ョ セロ ソ い メア ァ 「 

1 20 AL しま =TNPUT も (1 ) 

1 30 AL=ASC じ (AL 和 ま ) 

140 IF AL>64 AND AL<91 THEN AL=AL+32 

1 っ 0 =INSTR(A ま も ,CHR ま も (AL ) ) 

160 IF A=0 THEN PRINT AL も 八 ア ルフ ァ A" ウト テ " 八 アリ マセ ン " END 
170 PRINT USIND "|! 八 村 考 * ン メ ノ アル ファ A" リト テ " ス " *AL ま 。A 

180 END 


に ロロ 
8 ハハ 1 ルソン メー プ アル ファ A “リト テ ” ス 
Uk 


un 
Z 敗 2Z6 ハン メー ノニ アルファベ A“ リト テ ドス 
0 ト 


Fun 
プ れれ アル ファ ヘ A" リト テ “ 八 アリ マセ ン 
UK 
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INT 


数 條 関数 


小数 点 以下 を 切り 捨て た 整数 値 を 与え ます 。 
INT(< 数 式 > ) 
A=INT(1.23) 


・ < 数 式 > の 値 を 超え な い 最 大 の 整数 を 与え ます 。 
・FIX と の 違い に 注意 し て くだ さい 。 


F] 久 


100 
110 
120 
130 
140 
150 
160 
170 
180 


PHT1 


, CINT 


ーーー セイ スウ ト ラ " ウス ウー ノ グ A" ツ ーー 


DIM A$(1) 
A$(0)=" シ *9 ス 9 テ " ス " 
A$(1)=" セ イス 9 テ * ス " 

FL=0 

INPUT A 

IF A=INT(A) THEN FL=1 


PRINT Ai*" 
END 


3 生生 (FL ) 


? 123 
1/3③ 八 セイ スウ テ " ス 
り k 


PF) 


Y 123。.456 


1 23。456 


Uk 
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KEY 一 般 ス テー トメ ント ~ 


キー ボー ド 上 に ある プロ グラ マブ ル ・ フ ァ ン クシ ョ ン キ ー の 
内 容 を 定義 し ます 。 

KEY< キ ー 番 号 >, < 文字 列 〉 

KEY 1, “CMD COPY" 十 CHR$(13) 


・ フ ァ ン クシ ョ ン キ ー は 5 つ [f・1 一 あり , シフ 
トキ ー を 押し た と き の フ ファンクション キー を 加え る と 合計 
10 の < 文字 列 > を 記憶 きせ て お く こ と が で きま す 。 

* 各 ファ ンク ショ ン キ ー は 最大 15 文 字 ま で の 文字 列 お よび コ 
ント ロー ル 文 字 を 定義 むす る こと が で きま す 。 

・ キ ー ボ ー ド か ら 直 接 入 力 で き な い 文字 は , CHR$ 関数 で つ 
な いで 使い ます 。 

・ < キー 番号 〉 は 1 一 10 ま で で 指定 し て くだ さい 。 











KEYLIST, CHK$ 


100 KEYLIST 
110 FOR 1=1 TO 10 

120 KEYI ,STRING$( 15,CHR も (64+ 1 ) ) 
130 NEXT 1 

140 KEYLIST 





ビ ロ ロ 
Cm 上 1 me 中 
ョ ロロ 七 の に KG 
9 〇 † の PP 1n セ 
1 it 11 幻 。 
Fn ここ On 


AAAAAAAAAAAAAAA FFFFFFFFFFFFFFF 
BBBBBBBBBBBBBBB CGCGGGbGGGGG5G66 
じ CCCCUCCCCCCCCCCE HHHHHHHHHHHHHHH 
DUDDDUDDUDUDUUDDUD IIIIIIEIIIIIITIII 
EEEEEEEEEEEEEEE JJJJOAJJUJN MM 
Uk 
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KEY LIST 周一 般 コ マン ド 


ファ ンク ン ョ ン キ ー の 内 容 を 画面 に リス ト ア ウト し ます 。 
式 ) KEY LIST 

(文例 ) KEY LIST 

・ フ ァ ン クシ ョ ン キ ー の 内 容 の 一 部 は 画面 の 最 下 行 に 表示 さ 
せ て お く こ と が で きま す が , KEY LIST は , その すべ て の 内 
容 を 画面 に 表示 させ る こと が で きま す 。 








KEY 





サン リ レ TS 
プロ グラ ム key 1 = モ 
Cm a 
ョ u 七 〇 key 


9O て o PF 1 ロキ 
1 1 紀 モ 1 ij ョ t。 
euL こ CO ロロ 
Uk 


が Fi 
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ディ スク 


KILL lslINJIN| 一 般 コ マン ド 


フロ ッ ピ ィ デ ィ ス ク 上 の ファ イル を 削除 し ます 。 

書 式 KILL< フ ァイル 名 > 

文例 KILL “2 : test" 

解説 < ツテ オル 名 > で 蛋 定 し だ ファ イル を フロ ッ レ ルディ ンク か 


ら 削 除 し ます 。 

・ 削 除 す る ファ イル は クロ ー ズ され て いな けれ ば な り ま せ 
ん 。 も し , オー ブン 状態 の ファ イル を 削除 し よう と する と 
File already open'" エ ラー が 起り ます 。 ま た , 書き 込み 禁止 属 
性 の 付け られ た ファ イル を KILL で 削除 し よう と する と "File 
write protected" エ ラー が 起り ます 。 こ の 場合 SET で 書き 込 
禁止 属性 を 解除 し て か ら KILL を 実行 し て くだ さい 。 

・KILL で は 1 度 に 1 つの ファ イル し か 削除 で きま せん 。 
折 作 貞 剛 まま べべ で の ディ スク ラテ ノイ ルル ( グ 自 グラ ム 。、 ラ ング ム 
ファ イル ,。 シー ケン シャ ルフ ァイル ) に つい て 使用 で きま す 。 
ドラ イブ 番号 は ファ イル 名 の 前 に nm:” と 指定 し ます 。 省 崎 
され だ と き は ドラ イブ 1 が 指定 され た と みな され ます 。 し た 
が っ て 複数 の ドラ イブ の 中 に 同じ ファ イル 名 で 指定 され た フ 
ロッ ピ ィ ディ スク が ある 場合 注意 が 必要 で す 。 


SET, ATTR$ 





サン プル ti ョ 1 ' 

ニニ 100 OPEN “tea モモ 2 FOR OUTPUT AS 幕 1 

、 デ ログ ラム 110 PRINT 1。 KILL ta&@ 思 en ロモ 上 も" 
1 2 CLOSE 


140 FILESiPRINT 
150 KILL "tag も 2 
160 FILES 
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と 
1 in ロ Du 。 幕 
きい 8 
モ a モ ョ 


1 1 ロロ 。 幕 
き 〇 十 
da モ a 

0k 


トー トー トー 


トー トト キー 


1n 届 人 草 。 1 1 o 千 
dskf1 。 1 ki11 
紀 も モ e ョ 七 da 1 C ] og 
1h 必 人 峠 。 1 lo 
dsk 千 1 。 1 ki1l 
も ぉ ョ 七 da も 1 C1Ogmg 
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[ 」 


+ よ トート ー 


トー トー トー 


PF in 人 電 。 


ロ @ 七 


七 引 七 グ 


PF1n 人 七草 。 


=【- 


十 


= トー トー 


1 才 ・ 


ako* 
field 


ロ ョ に トロ 事 
field 


トー トー 


ーー 


LEFT$ 文字 関数 


文字 列 の 左側 か ら 指 定 さ れ た 長 さ の 文字 列 を 与え ます 。 
LEFT$(< 文 字 列 >, < 数 式 > ) 
_ 例 B$ーLEFT$(A$, 3) 





・LEFT$ は < 文字 列 〉 の 左側 か らく < 数 式 > で 指定 され た 長 さ の 
文字 列 を 取り 出す 関数 で す 。 

・ < 数 式 > は 0 一 255 の 範囲 に な けれ ば な り ま せん 。 

・ < 数 式 > が , < 文字 列 〉 の 総 文字 数 以上 の 場合 は , < 文字 列 〉 全 
体 を また , < 数 式 > が 0 な ら ば ヌル スト リン グ を 与え ます 。 





100 “ーー も モミ "レツ (10 ) ノ カイ テン (<ーー) 一 一 
110 INPUT A$ 

120 FOR =1 10 10 

1 30 PRIN「 ム A* 

140 B も =LEFT ま (も 1 ) 

1 っ 0 A も =MTD ま ( A ま , 2 )+B ま 

160 NEXT ] 

170 END 





Fuh 
7 012345678? 
01234 う 5678 
1234567890 
2Z345678901 
3456/82012 
4567820123 

つ 678201234 
6782012345 
78?0123456 
820123456Z 
2012345678 
Uk 
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LEN 文字 関数 





文字 列 の 長 さ を 与え ます 。 
LEN( く < 文字 列 >) 
PRINT LEN(A$ ) 


・LEN 関数 は 文字 列 の ほか に 空白 や 文字 と し て 画面 に 表示 
され な い 文 字 も 数 えま す 。 文字 と し て 画面 に 表示 され な い 文 
字 と は キャ ラク タコ ー ド が 1H か ら 1FH ま で の コン トロ ー 
ルコ ー ド と 呼ば れる も の を いい ます 。 


100 INPUT A ま $ 

110 L=LEN(A ま ) 

120 GOSUB 170 

130 PRINT "x 「:A$i' x* 

140 GODSUB 170 

1 つ 0 END 

160 “ 千 ]ame 

170 FOUR 【=1 TO L+4 

180 PRINT "x': 

190 NEXT I 

2Z00 PRINT 

10 RETURN 

ビ い Un 

2 NEC PC8SO01MKJL N80-BASIC 
上 光 米光 革 革 米光 光 革 光 光 光 区区 区 区 区 区 区 
※ NEC PC8001MKJL N80-BASIC ※ 
炎 光 区 光 甘 基 光 光 ※ 類 区 区 光 光 区 光 区 区 区 X※※ 
UKk 


2 一 120 











一 般 ス テー トメ ント 


変数 に 値 を 代入 し ます 。 
[LET]< 変 数 名 > ニ < 式 > 
LET AB 


・ キ ー ワ ー ド LET は 省略 し て も か まい ませ ん 。 

・< 式 > の 内 容 は , 数 値 , 文字 列 の いか な る 型 で あっ て も か ま 
いま せん 。 た だ し , 右辺 が 数 値 式 の と き 左 辺 は 数 値 式 で な け 
れ ば な り ま せん 。 ま た , 右辺 が 文字 式 の と き 左 辺 は 文字 式 で 
な けれ は ば な り ま せん <。 


100 LET A=123 
110 LET B=,Z1 
120 じ =A+B 

130 PRINT “A 

140 PRINT "B 
150 PRINT "A+B =「: 
160 END 

PUF1 
A 

ぬ +B = 
Uk 


中 和則 日 


時 日 中 
ト J 
ト ユ 


123.21 
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LINE INJIN| グラ フィ ックス テー トメ ント 


機 能 
文例 
(解脱 


) テキ スト 画面 を 行 単位 に 機能 設定 し ます 。 

) 画面 に キャ ラク タ で , 直線 や 長方形 を か きま す 。 

3) 低 解 像 度 グ ラフ ィ ッ クス で 直線 や 長方形 を か きま す 。 

) LINE <〈 行 指定 >,。 < ファ ンク ショ ンコ ー ド > 

) LINE (Xi, Yi ) 一 (X2, Yz ), く 文字 列 >(, く ファ ンク ショ ン 
ロード PE 丁 | 

3) LINE (Lxi, Ly2 ) 一 (Lx 2, Ly2 ), < 機能 > [(. く ファ ンク 

ショ ンコ ー ド > 由衣 


1) LINE 7, 1 
2) LINE(0, 0) 一 (39, 19), “ 博 ". B 
3) LINE(0, 0) 一 (100, 50), PSET, 4, BF 


1)・ カ ラー モー ド の 画面 に お いて , 行 単 位 に 機能 を 設定 し ま 
す 。 
・< 行 指定 〉? は 0 か ら ( 1 画面 あたり の 行 数 ) 一 1 まで の 値 を 
と り , < ファ ンク ショ ンコ ー ド > は 次 の 様 に な っ て いま す 。 


Aa 


0 また だ は 4 一 ノー マル 
bl まだ は 5 一 プリ ンク 
2 球 だ は 6 一 リバ パース 
3 まだ は 7 一 リバ ー ス ブリ ンク 


文例 で は , 画面 の 8 行 目 (即ち 第 7 行 ) が プリ ンク し ま 
す 。 なお, この 合 多 は 白書 モー ド で は “Syntax error” に 
な り 実 行 で きま せん 。 
2)・ 画面 に キャ ラク タ を 使っ て , 線 を 引い た り 箱 を 書い た り 
し ます 。 
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・< 文 字 列 〉 の 最初 の 文字 列 を 使っ て キャ ラク タ 座 標 の 2 点 
(X, Y), (X2, Yz) を 結ぶ 直線 を 引き ます 。 Xi, Xz は 水平 位置 
を 表し , 0 か ら ( 1 行 あ た り の 桁 数 ) 一 1 の 値 , Y」, Y。 は 垂 
直 位置 を 表し , 0 か ら (1 画面 あたり の 行 数 )ー 1 の 値 を と 
り ま す 。 < ファ ンク ショ ンコ ー ド >〉 は , COLOR に 用 いら れ 
る も の と 同じ で す 。 

・ ま た 最後 に B を 付け る と (Xi, Yi), (X。, Y。) の 2 点 を 角 と 

する 四角 形 の 枠 を 描き , BF を 付け る と その 梓 の 内 側 も キ 
ラク ク で 介 め ます 。 

3) ・ 低 解像度 グラ フィ ッ ク に より 線 や 箱 を 書き ます 。 

・ 基 本 的 な 使い 方 は 2) の 場合 と 同じ で す が , キャ ラク タ で 
は な く ピ クセ ル で 線 を 引き ます 。 し た が っ て 与え る 座標 
は キャ ラク タ 座 標 で は な く グ ラフ ィ ッ ク 座 標 で す 。 

・ < 機能 > は 。 PSET また は PRESET の どちら か を 指定 し 
ます 。PSET で 線 を 書き PRESET で 線 を 消し ます 。 

・< フ ァ ン クシ ョ ンコ ー ド > は COLOR で 指定 され る も の 
こと 同じ で す 。 





100 CONSOLE ,,,1 

110 LOCATE 0,0 

120 PRINT * abcdefghi jk 1mnopuF ヨ モエ u ソ ゅ メア アー 
130 LINE 0。1 


100 COUNSOLE ,,,1 
110 LINE(0,0)-(10.10)。 2 
120 LINE(1,1)-(9.9)」"$ ,5,BF 


100 CUNSOULE 1 
120 LINE(10。10)-(90,40),PSET ,?,B 
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LINE INPUT 人 出力 ステ ー ト メン ト 


1 行 全体 (255 文 字 以 内 ) を 区 切る こと な く 文 字 変数 に 入力 し 
ます 。 

LINE INPUT〔 で プロ ンプ ト 廊 ら > : 〕< 文 字 変数 名 

LINE INPUT “NAME” : NAS 





( 書 式 ) 


文 例 


* で フロ ンプ ト 文 "> は 入力 デー タ を 受け る 前 に 画面 に 表示 さ 
れる 文 草 で す 。 

* 入 力 を 促す 凶 問 符 (? ) は 表示 され ませ ん 。 
・IRETURN| キ ー の 入力 まで に キー ボー ド か ら 入 力 さ れ た 
文字 列 デ ー タ が 文字 変数 に 代入 され ます 。 ま た , 文字 列 デ ー 
タ を 入力 せ ず キー だ け を 押し た 場合 文字 変数 は 
ヌル スト リグ が 入力 され た と みな され ます 。 

・LINE INPUT の 実行 は [CTRL| + [C|」 ま た は [STOP| に よっ 
て 中 断 す る こと が で きま す 。 そ の 場合 , コマ ンド レベ ル に 戻 
り , "Ok" と 表示 され ます 。 こ の と き CONT コマ ンド を 入力 
する と LINE INPUT の 初め か ら 実 行 が 再開 され ます 。 


(解説 





100 1INPUT _ INPUT : ぅ ム $ 

110 LINE INPUT LINE INPUT : ? 3B$ 
1ZU_ PRKINTIPRINT -INPUT : 「, ム も 

130 PRINT "LINE IiNPUT : *,B$ 





に い n 
INPUT g abcd, AB し DU, 1 2 コ 34 

? 上 xx エビ a 1GnOFed 
LINE INPUT : ?abcd。ABCD, 1234。"He1l1ou 


INPUT < ョ bcd | 
LINE INPUT : abcd,。ABCD,1234。 Heliou 
0k 
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LINE INPUT 時 [| 陣 似 人 出力 ステ ー ト メン ト 


1 行 全体 (255 文 字 以内 ) を 区 切る こと な く ン シー ケ ン ン ャ ル 
ファ イル より 文字 変数 に 代入 し ます 。 

LINE INPUT 半 < ファ イル 番号 >, < 文字 変数 

LINE INPUT せ 1, AS 

・< フ ァイル 番号 > は OPEN に よっ て , その ファ イル を 入力 と 
し て オー プン し た と き に 指定 し た 番号 で す 。 

・ < 文字 変数 > は, 行 全体 が 代入 され る 文字 変数 名 で す 。 

s LINE INPUT 壮 文 は シー ケン シャ ルフ ァイル より , CR コー 
ド ま で の , すべ て の 文字 を 区 切る こと な く 読 み 込み ます 。 読 
み 込 め る 文字 数 は 255 文 字 ま で で す 。 

・LINE INPUT 装 は デー タフ ァイル の それ ぞ れ の 行 が いく つ 
か の 欄 に 分 割 さ れ て いる と き や , アス キー セー ブ さ れ た フロ 
グラ ム を デー タ と し て 読み 込む と き な ど に 有効 で す 。 








400 OPEN "tdata FOR INPUT AS 昔 1 
110 LINE INPUTI 1。A も 

120 PRIN「 ム ま 

130 CLUSE 





ビ い ロロ 
1234567890 , abcdefghi jk 1 mn ,。 OPq コ ビラ 七 ロ ソ い メア ズ 
0Uk 
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LIST/LLIST IN] 一 般 コ マン ド 








メモ リ 内 に ある プロ グラ ム の 全部 また は 一 部 を 画面 ある い は 
プリ ンタ に リス ト ア ウト し ます 。 
1) LIST (< 行 番号 >] 〔 一 < 行 番号 >〕 


2) LLIST (< 行 番号 >] [一 < 行 番号 >〕 
LIST 100 一 200 





・ フ ログ ラム の 内 容 を 1 ) は 画面 に .2 ) は プリ ンタ に 出力 し ま 
す 。 LIST コマ ンド は 実行 し 終わ る と , コマ ンド レベ ル に 戻 
り ま す 。 

・〈 行 番号 〉 が 省略 され た 場合 は , 最も 若い 行 番号 の プロ グラ 
ム よ り リ スト アウ ト が 始ま り ま す 。 

・ 最 人 の < 行 番号 ? の み が 指 定 さ れ た 場合 に は , その 指定 され 
だ た 行 だ けが リス ト ア ウト され ます 。 最初 の < 行 番号 〉 と それ に 
計 く ハ イフ ン ま で が 指定 され た 場合 は , その 行 番号 以降 の 行 
が すべ て リス ト ア ウト され ます 。 両方 の 行 番号 が ハイ フン で 
つなが れ て 指定 され た 場合 に は , その 範囲 の すべ て の 行 が リ 
スト アワ ウト され ます 。 


110 N=1 

120 “ta も 

13U0 PRKINT N 

140 N=N+1 

150 IF N く 10 [HEN 130 
160 END 


1i= も て 110-140 
110 N=1 

120 "ta レセ 
130 PRINT _N 
140 N=N+1 

Uk 

1 1 = も 

140 N=N+1 

0k 

1i 引 も -130 


110 N=1 

120 “3 モモ ar セ 
130 PRINT N 
Uk 
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1i=t 140- 

140 N=N+1 

150 IF N<10 THEN 130 
160 END 

U に 
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LOAD [紹介 入出 力 コマ ンド 


プロ グラ ム を フロ ッ ピ ィ イィ デ ィ ス ク か ら メ モリ に ロー ド し ま 
す 。 

LOAD< フ ァイル 名 >[, RJ 

LOAD “2 : date” 








・〈 フ ァイル 名 〉 で 指定 され た ブ プログ ラム フ ァイル を メモ リ 上 
に ロー ド し ます 。 ロ ー ド を 実行 する と , 以前 メモ リ 上 に あっ 
た フロ グラ ム は 自動 的 に NEW され , すべ て の 開い て いる 
ファ イル を 閉じ , 変数 は その 値 が 失 な われ ます が ,R オ プシ ョ 
ン を つけ る と , ファ イル は 開い た まま で , プロ グラ ム を ロー 
ド 後 , た だ ち に 実行 を 開始 し ます 。 

・LOAD は , 指定 され た ファ イル を 見 つけ て , 実際 の ブ プログ 
ラム の ロー ド を 開始 する まで は , メモ リ 中 の プロ グラ ム を 保 
仔 し ます 。 


SAVE, MERGE, NEW 





1oad” 2:CAP-X1 
Uk 


1oad' jusho* 
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ディ スク 


LOC [slIMMIN| 入出 力 関数 














フロ ッ ピ イィ ディ スク ファ イル 中 で の 論理 的 な 現在 位置 を 与え 
ます 。 

LOC(< フ ァイル 番号 > ) 

LAST ニ LOC(1?) 


・〈 フ ァイル 番号 〉 で 指定 され た ファ イル が ラン ダム ファ イル 
で あっ た 場合 に は , LOC 関数 は ,。 その ラン ダム ファ イル に 
対し て 最後 に 読み 書き (GET/PUT) され た レコ ー ド 番号 を 返 
し ます 。 

・〈 フ ァイル 番号 >〉 で 指定 され た ファ イル が , シー ケン シャ ル 
ファ イル で あっ た 場合 に は ,。 その ファ イル が オー フン され て 
か ら , 読み 書き され た レコ ー ド 数 を 返し ます 。 


100 OPEN "1:data6 AS 昔 1 

110 FIELD 1.20 AS A ま 8 AS B$ 

120 INPUT “ナマ イエ” jNA ま も : INPUT "キュ 9 ヨ ”sKY 間 

130 LSET A ま =NA$:RKSET B も =MKD ま も (KY ):PUT 昔 1 

140 PRINT NA ま 』” サン / data 八 "iLOC(1)3 稚 " ン チ * ス 。 
150 INPUT "continue?(y/n) "3 じ ま ま 

160 fF C ま = ッッ THEN PRINTkGOTO 120 

1Z0 IF C ま < く >"n THEN 150 ELSE END 


un 

ナマ エ ツ ? キネ ムラ 

キュ 9 ウヨ? 200000 

キム ラ サン / data ハ 1 ハ " ン テ " ス 。 
con モ tinue ツ (yy/n)? ッ ァ 


ナマ エ ツ カト ウ 

キュ ウヨ ? 17Z0000 

カト リウ サン ノ qata 敗 2 "ソン テ " ス 。 
COntinue ア 〈(y/n)? n ロ 

Uk 
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LOCATE IN 





模 ( 藻 





画面 制御 ステ ー ト メン ト 


テキ スト 画面 の カー ソル 位置 を 指定 し ます 。 
LOCATE<X%>。 <Y>[, く カ ー ソ ルス イッ チ >〕 
LOCATE 10, 10 


*・ カ ー ソ ル を テキ スト 画面 の キャ ラク タ 座 標 く X〉, <〈Y〉 の 位 
直 へ 移動 し ます 。 

・〈 く XX>〉 は 水平 座標 を 表し , <Y> は 垂直 座標 を 表し ます 。 

*〈 く XX>。 〈Y〉> は テキ スト 画面 の 左上 を 0, 0 と する キャ ラク 
タ 座 標 に より 指定 し ます 。 ま た < く X〉, <Y> の 範囲 は WIDTH 
で 指定 され た 〈 桁 数 > と < 行 数 ? に よっ て 決ま り , 次 の よう に な 


り ) 9 5 
〈※〉> ーー0 一 (<〈 竹 数 > 一 1) 
〈Y〉> =0 一 (<〈 行 数 > 一 1) 


*・< カ ー ソ ルス イッ チ 〉 は カー ソル の 状態 を 決め る スイ ッ チ 


で , 1 で 表示 され 0 で は 表示 され な く な り ま す 。 
100 "-- character pa 上 tern ーー 


110 
12ZU 
130 
140 
1 っ U 
160 
170 
180U 
120 
2Z00 
Z10 
ZZ0 
Z30 
Z40 
2 っ 0 
Z6U 
Z70 
2Z80 
2?0 
300 
310 


CUNSOLE 0.25.0,1:MIDTH 80,25:PRINT CHR ま $( 12 ) 
DATA 10.23.45,53,43,35,47。41 18,24 

FUR !=1 TO 10:READ DAT(1I):NEXT Ii 

GUSUB 180:GO0SUB 240 

も =TNPUT「 生 (1 ):PRINT CHR も (12 ) 


GUSUB 180:GUSUB 290:LOCATE 0,23』END 


ーー 9 ビ ョ ph dFau ーー 
メニ コ づ 
FUR Y=1 TO 19 
LOUCATE X。YiPRINT 1i”" 
NEXT Y 
LUCATE 上 3。20:PRINT STRING ま も (56。"ー” ):RETURN 
"XX bar 
LOUCATE 25.0:PRINT “< X BAR GRAPH >* 
FUR =1 TO 《0 
LUCATE 4。IX2-1:PRINT STRING ま (DAT( 1 エ ) 。CHR も ( &H8S7 ) ) 
NEXT IiRETURN 
"y bar 
LUCATE 25.0:PRINT < Y VAR GRAPH > 
FUR 『=1 TO 10 
FOUR J=19 TO 19-DAT( 1I)/3 STEP -1 


づ Z0 LUCATE IT※5。JiPRINT CHR 和 まま (&H87 ) 
330 LOUCATE IT※ コ +1 JiPRINT CHR ま (&H87 ) 
340 NEXT J 

3 っ 0 NEXT IiRETURN 


2 フー130 


5RAPH > 


く XX BAKR 


! 


| 


1| 


1 


1| 


] 


] 


1 


] 


| 

1 

1 
! 

| 

! 

| 

] 

1 


ーー ーー ーー ニー ニーー ニ ーー ニーー ニ ーーーーーーーーーー デ ーーーーーーーーーーーーーーーーーーー ィ 』】 ナ こ ー ョ ーー ピー ピピ ョ コ ーー 有 テー で 


く Y VAR _ GRAPH > 


ャ トーゴ ーー ーー ロー ーー ーー ーー ーー ニー ーー ビー ーー トー キー 


> CPP > WEEE 
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LOF [slliIN] 入出 力 関数 








ノ ファ イル の 大 き さ を 与え ます 。 
LOF(< フ ァイル 番号 >) 
MR ニテ LOF(2 ) 

・ LOF 関数 は く フ ァイル 番号 > に より 指定 され た ディ スク 
ファ イル の 大 き さ を セク タ 数 で 返し ます 。 そ の ファ イル が ラ 
ンダ ム フ ァ イル で あれ ば その ファ イル を オー プン し た と き の 
取 大 の レコ ー ド 番号 に 相当 し ます 。 

* GET で LOF 関数 の 返す 値 よ り も 大 き な レ コー ドナ ン バ ー 
を 指定 する と “Input past end'" エラ ー が 起り ます 。 





100 “-- LOF of equntia] &random file 一 一 
110 OPEN “2:adata1 ” FOR OUTPUT AS #1 
120 PRIENT #1.123:CLOSE 

130 OPEN “2:sdata1 ” FOR INPUT AS ##1 
140 OPEN “2:rdata1 ” AS 昔 2 

150 FIELD ##2.128 AS A ま 。128 AS も 

160 PRINT _ da て a1 ノ セク タ 29 八 LOF(1)1 
170 PRINT “rdata1 / セク タ ス 29 ハ "LOF( 2 ) 。" 
180 CLOSE 


いり n 
da も ta1 / セク タ ス 9 1 テ * ス 。 
Cdata1 / セク タ スウ 9 0 テ “ ス 。 
0k 


チチ 
>J >J 
なら 


sl | 
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LOG 











NIN] 数 値 関数 


自然 対数 を 与え ます 。 
LOG(< 数 式 >) 
A ニ LOG(35/9) 


・ < 数 式 > に よっ て 与え られ た 値 の 自然 対数 (6 を 底 と し た 対 
数 ) を 返し ます 。 
・ LOG 関数 の 演算 は 単 精度 で 行わ れ ま す 。 


100 “ーー シラ " ョ ウヨ ウ タイ スウ ヲ モト メル ーー 

110 F ま ="]1og10( 析 析 。 析 村 栖 糧 杜 "^「 ) 三 栖 拉 。 拉 柏 析 柱 
120 INPUT L 

130 A=LUGK( 10 ) 

140 B=LUG(L ) 

150 PRINT USING F ま も jL,B/A 

160 END 


PUFT1 

? 100 

1og10( 1.00000E+02)= 2.00000E+00 
Ok 

FP Fi 

? .1245 

1og10( 1.24500E-01 )=-9.04831E-01 
Ok 

PHTT 

? 876,2 

1og10( 8.76200E+02)= 2.94260E+00 
0k 
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LPOS IN]| 入出 力 関数 


現在 の プリ ンタ の ヘッ ド 位 置 を 与え ます 。 
LPOS(< 式 >) 
HE ニ LPOS(0 ) 


・< 式 > の 値 は ダミ ー で あり 意味 を 持ち ませ ん 。 


100 FOR I=0 「U 20 
110 IF LPOS(0)>=40 THEN LPRINT 
120 LPRINT SQR(E)。 





130 NEXT 1 

140 END 

ビ n 
U 1 1 .41421 
1 ./320 ゝ の 2。23607 
2 .44949 2。645/ つ っ 2 .82843 
づ さ 。16Z28 3 。 づ 1663 
ば 。464 1 3.60555 さ 。74166 
づ 。8/Z ツ ロ 4 4 ,1231 1 
4 。24264 4 。 3 つ 8 ツ 4.47Z214 

Uk 
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LSET/RSET sllIN| 入出 力 ステ ー ト メン ト 








ファ イル バッ ファ へ ヘ デ ー タ を 書き 込み ます 。 
LSET< 文 字 型 変数 > 三 < 文 学 列 > 

RSET< 文 字 型 変数 > 三 < 文字 列 > 

LSET A$=“N-BASIC" 

RSET B$=“N80-BASIC” 


・ Left SET, Right SET の 意味 で ラン ダム ファ イル の レコ ー ド 
の , FIELD で 定義 し た 文字 変数 に 該当 する 領域 に デー タ を 格 
約 し ます 。 

・ 格 納 す る デー タ は 文字 型 デ ー タ で な けれ ば な ら す , 数 値 
デー タ は MKI$, MKS$, MKD$ の いずれ か に より 文字 型 デ ー タ 
に 変換 し な けれ ば な り ま せん 。 

・ < 文字 列 〉 の 文字 数 が FIELD で 割り 当て られ た 長 さ より 短 
い 場 合 。 LSET で は 左 詰 めで フィ ー ル ド を 満た し ます 。 ま た , 
< 文字 列 ?) が フィ ー ル ド よ り 長 い 場 合 は , LSET, RSET と も 右 
側 の 部 分 が 天 わ れ ま す 。 

・ < 文字 型 変 数 > は , FIELD で あら か じ め 定 義 S8 れ て いな けれ 
ば な り ま せん 。 定義 S れ て いな い 変 数 を 用 いる と エラ ー が 発 
生 し ます 。 





FIELD, PUT 


100 OPEN "1:rdata' AS #1 
110 FIELD 1,20 AS A$,10 AS B$ 
120 LINE INPUT "ヒッ メイ ?"』NA ま 
130 INPUT "タン カ "5jPR% 

140 LSET A$=NA$ 

150 RSET B*$=MKI$(PR%) 

160 PUT #1.。1 

170 CLOSE 

Dk 


ビ い ロ 
ヒン メイ ? メ ンタ イコ 
タン カ 7? 300 
Uk 
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MERGE [| 央 人 入出 力 コマ ンド 





メモ リ 上 に ある プロ グラ ム と フロ ッ ピ ィ デ ィ ス ク 上 の プロ グ 
ラム ファ イル を 混合 し ます 。 
式 ) MERGE< フ ァイル 名 > 








*・ メ モリ 上 の ブロ グラ ム と <〈 フ ァイル 名 〉 に より 指定 し た プロ 
クラ ム フ ァ イル を 1 つ に し て , メモ リ 上 に 置き ます 。 ここ で . 
指定 され た ファ イル は アス キー セー ブ さ れ て いな けれ ば な り 
ませ ん 。 そ う で な い 場 合 に は 。 エラ ー に な り ま す 。 

*・ フ ァイル 中 の プロ グラ ム と , メモ リ 上 の プロ グラ ム に 同一 
行 番号 が あっ た 場合 に は , メモ リ 上 の 行 は ファ イル 中 の 行 で 
赴き 換え られ ます 。 


SA VE 





merge 8ー 〇 
0 


に 
merge 2:CAP-X1「 
Uk 
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(1)MID$ 














文字 ステ ー ト メン ト 





文字 列 の 一 部 を 指定 され た 文字 列 で 置き 換え ます 。 
MID$(< 文 字 列 や 。< 式 化 〔, < 式 2>] ) < 文字 列 2> 
MID$(A$, 3) "ABC" 


・< 又 字 列 1> の < 式 1〉 番 目 の 文 字 か ら < 式 2 > 個 の 文字 を , < 文 
字 列 2 > の 最初 か ら <〈 式 2 > 個 の 文字 列 で 置き 換え ます 。 


*< 式 2> が 省略 され た 場合 、 ま た は < 文字 列 2> の 文字 数 より 





り ま す 。 

*< 式 1> 十 < 式 2> 一 1 の 値 が < 文字 列 1 > の 文字 数 より 大 きく 
な り , 指定 し た 文字 列 が あふ れ て し まう 場合 は , (< 文字 列 1 
の 文字 数 ) 一 < 式 1> 十 1 の 値 を < 式 2〉 と し , < 文字 列 2> の 残 
り の 部 分 は 無視 し ます 。 

・< 式 1> の 値 は < 文字 列 1 > の 文字 数 より 大 きく て は いけ ませ 
ん 。 ま た ,。 0 以下 で あっ て も いけ ませ ん 。 し た が っ て < 肥 字 
列 1> に ヌル スト リン グ を 指定 する こと は で きま せん 


100 DATA My name jij5 01ELEHIEI 

110 DATA AFrai ,Suzuk 1 Komatau。 Matanabe 
120 READ A ま 

130 FOR 1=1 「O0 4 

140 READ _ NA$:MIDU ま (AA 和 ま ,12 )=NA$ 

1 コ U PRKINT A ま = 

160 NEX[ 

Uk 


Fun 
My name 15 Arai! llI 
My name is Suzuki!! 
My name 15 Koma 上 =! 
My name is Matanabe 
Uk 
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(2)MID$ 














文字 関数 





文字 列 の 指定 され た 位置 か ら 任意 の 長 さ の 文字 列 を 与え ま 
す 。 

MID$(< 文 字 列 >。< 式 侯 〔, < 式 2>〕 ) 

B$ーMID$S (AS, 2, 3) 


・< 式 1) は , < 文字 列 〉 の 充 側 か ら 数 え , 文字 列 を 取り 出す 最 
伯 の 位置 を 志 し ます 。 ま た < 式 1〉 は 1 一 255 の 範囲 に な けれ 
民 な り ま せん 。 

*〈 工 2 > は , <〈( 式 1> で 示さ れ た 位置 か ら 取 り 出 す 文 字数 を 指 
定 し ます 。< 式 2> は 0 一 255 の 範囲 で す 。 

*<〈 式 2> を 省略 し た と き , また , < 式 2〉 が < 式 1 番目 か ら 右 
の 文字 数 (つま り , 残り の 文字 数 ) よ り 大 きく な っ た と き , < 民 
1〉 番 目 よ り 石 の 文字 列 全部 が 結果 と な り ま す 。 


・〈 プ 2 > が 0 の と き , また は , < 文字 列 > 全 体 の 文字 数 が ,< 式 
1 > より 小さ い 場 合 。 MID 関 雪 は ヌル スト リン グ を 与え ます 。 





100 MIDTH 40.25:CMD CLS 1 
110 A ま ="PC-8001MK][ "+STRING ま (10。′ ") 
120 『=1 

130 LUCATE 10。10 

140 5USUB 220 

150 PRINT ム ぬ ま 

160 B ま =LEF も (A 和 ま 。 1 ) 

1 0 ム 生 =MTD ま (AA 和 ま 。2)+B ま 

180 1 =]+1 

190 IF T>30000 THEN =O 

2Z00 GUTU 1 30 

210 "uait routine 

ZZ0 FOR 【=1 TO 100:NEXT 

Z30 RETURN 
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MKI$/MKS$/MKD$ [sll[N) 交 字 関数 


機 能 ) 各 導 値 を 内 部 表現 に 対応 し た 文字 コー ド を 与え ます 。 
1) MKI$(< 整 数 表記 >) 





2) MKS$ (< 単 精度 表記 >) 
) MKD$(< 倍 精度 表記 >) 


いう 


A$ーMKI$(128) 
) LSET B$= ニ MKS$(1.23) 
) RSET C$= ニ MKD$( 3.14159265389# / 


NO 。 = 


う 


(解脱 ・ こ れ ら の 関数 は , 数 値 を ラン ダム ファ イル ・ バ ッ フ ァ に 対 
し て LSET/RSET 命令 で 書き 込む 際 に 使用 し ます 。 数値 か ら 
文字 へ の 変換 は 数 値 が 持つ 内 部 表現 ( 2 進数 表現 ) の 値 を その 
まま それ に 対応 する 文字 コー ド に する こと に よっ て 行わ れ ま 
す 。 こ の 逆 の 動作 を する 関数 と し て は CVI/CVS/CVD が 用 意 
きく 00 ます の 。 

1) 整数 値 を 2 文字 (2 バイ ト ) の 文字 列 に 変換 し ます 。 
2) 単 精度 数 値 を 4 文字 (4 バイ ト ) の 文字 列 に 変換 し ま 


3) 倍 精度 数 値 を 8 文字 (8 バイ ト ) の 文字 列 に 変換 し ま 


STR$ 関数 と は 変換 の 仕方 が 異な り ま す 。 


CVIL/CVS/CVD. STR$ 付録 A_ PC8001MKI ユー ザー ズ マ ニュ 
アル 








100 "-- random da も ta Pu 一 一 

110 OPEN ":rdata ” AS 1 

120 FIELU #1.2 AS 1 も ま 。4 AS D2 ま 8 AS 唱 3* 
130 A シ =123 

1 40 B=8/65 。43 

1 コ 0 じ 昔 ニ ゴ ,141 コ 926 コ 3 うつ は ツァ アツ 柏 

160 LSET D1 も =MKT ま (A ) 

1 70 LSET D2 ま =MKS も (B ) 


2 一 139 


180 


LSE「 3 ま =MKD ま ( じ 間 ) 


) PUT 1。1 


ーーandOm ata ge 一 一 
GET #1。1 
AA 々 = じ CVTI(D1 ま ) 
B=CVS(D2 ま も ) 


123 
87e5.43 
3.14159265358979 
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MON INjIN| 一 般 コ マン ド 














内 蔵 の 機械 語 モ ニタ に 制御 を 移し ます 。 
MON 
MON 


・ BASIC モー ド か ら 内 蔵 の 機械 語 モ ニタ に 制御 を 移す た め 
の マン ド で すず す 。 

・ モ ニタ が コマ ンド レベ ル に 入る と 画面 の 左端 に "* ネ "が 表示 
され ます 。 

。 モ ニタ に は 次 の よう な コマ ンド が あり ます 。 詳し く は PC- 
8001MKI ユー ザー ズ マニ ュ ア ル を 参照 し て くだ さい 。 


に 


5 内 容 
メモ リ の 内 容 を ディ スフレ イ に 表示 し ます 。 
機械 語 プ ログ ラム の 実行 を し ます 。 
カセ ッ ト テ ー プ か ら メ モリ ヘ ロ ー ド し ます 。 

LV カセ ッ ト テ ー ブ フ ブ の 内 容 と メモ リ の 内 容 を 比較 


し ます 
S メモ リ の 内 容 を 変更 し ます 。 


TM メモ リ の テス ト を 行い ます 。 
W メモ リ の 内 容 を カセ ッ ト に セー ブ し ます 。 
十 [B] BASIC に 戻り ます 。 
・ BASIC の コマ ンド レベ ル に 戻る に は [CTRL| + [B] を 入 
し て くだ さい 。 
PC-8001MKI ユ ー ザ ー ズ マヤ マニュアル 


mOn 
%DO0 , 2F 

DU000 F3 31 FF FF C3 3B 0U0 00 C3 6A 00 C3 5Z 1Z ABFO 
0010 C3 52 42 C36A 00 DA 0C C3 A6 40F3 OB し 3 左 50 
0020 C3 DAF1 C3 2C ZZ 88 0C C3 DDF1 C3 60 0HD 46 0C 
※ 

Uk 
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MOTOR IN| 入出 力 コ マン ド 


カセ ッ ト テ ー プ レコ ー ダ の モー タ の ON.OFF を 制御 し ます 。 
MOTOR〔< ス イッ チ >〕 
MOTOR 1 


*・< ス イッ チ > を 0 に すれ ば モー タ は OFF に . 0 以外 の 値 に 
すれ ば ON の 状態 に な り ま す 。 
*〈< ス イッチ > を 省略 し た 場合 、 モー タ が OFF の 状態 な ら ON 


区 


ON の 状態 な ら OFF に な り ま す 。 


PC-8001MKI エ ユー ザー ズ マ ニュ アル 


100 
110 
12U 
130 
140 
1 っ 0 
160 
17U 
180 
120 
2Z00 


PF 


MOTOR 1 
PRINT “Reuind andg set then tape," 


INPUT "Are you ready ( ッ ノ n ) 1 人 A ま 
IF LEFT$(A ま 。1) く > ッッ” THEN END 
PRINT 

MUTUR 0 

PR ENT “Push PLAY button 。" 
INPUT "Are you ready (y ノ hn ) "iA 
IF LEFT ま (A ま 。1) く >" ッ ”" THEN END 
MOTOUR 

END 


Reuind and se then て ape 。 
Pe yyOu egady (yy/n)Z ッ 


Push _ PLAY button 。 
Fe you Peady (y/n)? ッ ァ 


Uk 
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MOUNT [sl[N) 入出 力 コマ ンド 








ディ スク の ファ イル 配置 表 ( 

力 を 可能 に し ます 。 

MOUNT[< ド ライ ブ プ 番 号 >〔, く ドラ イブ 番号 >……〕]〕 
MOUNT 





・ フ ロッ ピ ィ ディ スク と の 入出 力 (LOAD, OPEN, PRINT 韻 ) 
な ど を 行う 前 に MOUNT を 実行 し な けれ ば な り ま せん 。 

・< ド ライ ブ 番 号 〉 を 省略 し た 場合 , 現在 接続 され て いる すべ 
て の ドラ イブ が MOUNT され ます 。 

・ MOUNT を 実行 する と BASIC は ディ イス ケッ ト か ら フ ァ ィ 1 
ル の 配置 表 を 読み 込み , 誤り を 調べ ます 。 誤り が な けれ は ば , 
その フロ ッ ピ ィ デ ィ ス ク は マウ ント され ます 。 も し 誤り が 
あっ た 場合 に は , BASIC は フロ ッ ヒ ビィ デ ィ ス ク を マウ ント す 
る た め に 予備 の 配置 表 を 読み 込 も うと し ます 。 そ の 場合 , 次 
の メッ セー ジ が 表示 され ます 。“X copies of allocation bad on 
driveY"X は 1 また は 2, Y は ドラ イブ 番号 で す 。 こ の 警告 
が 起き た 場合 は 。 ファ イル の 配置 表 に 何ら か の トラ ブル が 発 
生 し て いる 訳 で すか ら , 新しく フロ ッ ピ ィ デ ィ ス ク の コピ ビー 
を 作る こと を お 勧め し ます 。 も し 予備 の 配置 表 の コピ ビー が 票 
けれ ば 。 致命 的 な エラ ー で ある “Bad allocation table" と な 
D り . その フロ ッ ピ ィ イデ ィ ス ク は マウ ント され ませ ん 。 

s フ ロッ ピ ィ ディ スク が マウ ント され て いる 間 に , BASIC は 
時 折 を その フロ ッ ピ ィ デ ヂ ディスク に 配置 表 を 書き 込み ます が , そ 








の ドラ イブ に リー ド ・ ア フタ ー ラ イト の アト リピ ビ ュー ト が 


セッ ト さ れ て いな けれ ば エラー チェッ ク を 行い ませ ん 。 
(SET 参照 。) 
。・N so DISK-BASIC で は オー ト MOUNT, REMOVE を 採用 し て 
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いる た だ ため, これ ら の 操作 は すべ て BASIC が 管理 し ます 。 
・NsoDISK-BASIC で MOUNT は 実行 され ませ ん 。 エ ラー は 起 
ら す , フロ グラ ム の 実行 に 影響 を 及ぼ すこ と も あり ませ ん 。 


REMOVE, SET 





moun 革 1 


moun て も 2 
DUk 
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lelININ| 一 般 コ マン ド 


フロ ッ ピ イィ ディ スク 上 の ファ イル の 名 前 を 変え ます 。 
NAME< 旧 ファ イル 名 > AS < 新 フ ァイル 名 > 
NAME “2 : sample" AS “2 : SAMPLE.2" 


s* < 旧 フ ァイル 名 >〉> で 表わさ れ て いる フロ ッ ピ イィ ディ スク 上 の 
ファ イル を < 新 フ ァイル 名 > に 変更 し ます 。 

・ ド ライ ブ の 指定 は < 上 日 ファ イル 名 >〉, <〈 新 ファ イル 名 >〉 中 の 先 
頭 に ドラ イブ 番号 を コロ ン C(:) で 区 切る こと に より 行わ れ ま 
す 。 

・ ド ライ ブ 番 号 を 省略 し た 場合 . ド ドラ イブ 1 が 指定 され ます 。 
・NAME に より ファ イル 名 の 変更 を 行う と き , その ファ イ 
ル は クロ ー ズ され た 状態 で な けれ ば な り ま せん 。 


KILL 


100 OPEN "oldtest'" FOR OUTPUT AS 拉 1 
110 FOUR J=1 TO 10 

1 20 PRINT 昔 1。J 

130 NEXT JiCLOSE 

140 FILESIPRKINT 

150 NAME "oldteat AS "neute キ ' 


160 FILES 

ビ い ロ ' | 

Thank 1 yoOu ! Darlin g! 1 oldtes 1 
Thank 4 ア Ou! 1 Uarlin g! 1 ne ぃ も te セ 1 
U り に 
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NEW 一 般 コ マン ド 








メモ リ 上 に ある プロ グラ ム を 抹消 し , すべ て の 変数 を クリ ア 
し ます 。 

NEW 

NEW 

・。 NEW は ,。 コ マン ドレ ベル に ある と き 新 し い プ ログ ラム を 
入力 する 前 に 実行 し ます 。NEW の 実行 が 終わ る と , いつ も 
コマ ンド レベ ル に 戻り ます 。 

・ NEW は , オー ブ プン され て いる ファ イル が ある 場合 . それ 
を 自動 的 に すべ て クロ ー ズ し ます 。 





10 “NEM sample 

20 “NEM initializes the program. 

30 PRINT "Don"t use NEM in a program like this!「 
40 PRINT "Program is deleted。「 

50 NEM 

に じい 

Don "も モ use NEU in a program like thisl 
PCroO ロ Fam 15= deleted。 

0k 

| 1 も 

0k 
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OCT$ 文字 関数 


10 進 数 を 8 進数 の 文字 列 に 変換 し ます 。 
OCT$( く < 数式 >) 
PRINT OCTS(A) 





・< 数 式 > の 値 を 8 進数 に 変換 し て , その 文字 列 を 与え る 関数 
で す 。 

・< 数 式 > の 値 は , 一 32768 一 32767( ま た は 0 一 65535) ま で で 
す 。 ま た , <〈 数 式 > に 小数 点 が 含ま れる 場合 , 小数 点 以 下 を 切 
捨て ます 。 





100 "%※※ decimal --> octal -->hexadec1imal ※※ 

110 FUR I=U TU 16 

1 20 DE ま =RKIGHT も ま ("  +STR ま ( 1 エ ) 3) 

130 0C ま =RIGHT ま も ("。 +OCT ま も ( 1) 。3) 

1410 HE も =RIGHT ま (”  +HEX ま ( 1) 。3) 

150 PRINT "DECIMAL : "DE ま も 。" DCTAL : "0C ま 。"HEX: "HE まま 





160 NEXT 1I 

P Hf1 

UECIMAL: 0O UCTAL: DO HEX: 0 
DECIMAL: 1 UCTAL: 1 HEX: 1 
UECIMAL: 2 UCTAL: 2 HEX: 2 
UECIMAL: 3 UCTAL: 3 HEX: 3 
UECIMAL: 4 UCTAL: 4 HEX: 4 
DECIMAL: 5 UCTAL: 5 HEX: 5 
DECIMAL: 6 UCTAL: 6 HEX: 6 
DECIMALI アァ 0CTAL: ア HEX: ア 
DECIMAL: 8 UCTALi 10 HEX: 8 
DECIMAL: 9②9 DCTAL: 11 HEX: の 
DECIMALi 10 UCTALg 12 HEX: A 
DECIMAL: 11 UCTAL: 13 HEX: B 
DECIMAL: 12 DCTALi 14 HEX:。 し C 
DECIMAL: 13 0UCTAL: 15 HEX: HH 
UECIMAL: 14 DCTALz 16 HEX: E 
DECIMAL: 15 UCTAL: 1Z HEX: F 
DECIMAL: 16 UCTALg 20 HEX: 10 
Uk 
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ON ERROR GOTO [ 同 [N) 特殊 ステ ー ト メン ト 














エラ ー ト ラッ プ を 可能 に し , エラ ー 処 理 ル ー チ ン の 開始 行 を 
定義 し ます 。 

ON ERROR GOTO< 行 番号 > 

ON ERROR GOTO 1000 


*・ エ ラー トラ ッ プ 機能 が 可能 に な る と , エラ ー が 検出 され た 
こき 指定 され た だ た エラー 処理 ルー チン へ プロ グラ ム の 制御 が 移 
り ま す 。 

・〈 行 番号 〉 の 行 が 存在 し な けれ ば ば , 
行 ) の エラ ー が 起こ り ま す 。 

・ エ ラー トラ ッ プ 機能 を 無効 に する に 
を 実行 し て くだ さい 。 

・ エ ラー 処理 サブ ルー チン の 実行 中 に エラ ー が 起き た 場合 に 
は , それ に 対す る エラ ー メ ッ セ ー ジ が 表示 され , 実行 は 停止 
し ます 。 エ ラー 処理 サブ ルー チン の 中 で 
は 起こ り ま せん 。 

処理 後 、 プロ グラ ム の 実行 を 再開 する に 
RESUME を 使い ます 。 


"Undefined Line”( 未 定義 


は ON ERROR GOTO 0 


は ,。 エラ ー ト ラッ プ 


s。 エフ ラー 


KRKESUME 


100 XX ノッ シラ シ " ョ ウ ヲ モト メル 
110 UN ERROR GOTO 180 


1200 “= モ ar セ | 

130 INPUT X : 52XiINPUT ーッ 5 jiY 

140 IF X=U 「IHEN ERROUR 2 っ 0 

150 Z=X^YiPRINT ”。 yiPRINT XX = 3Z 
160 GOTO 130 


~ 己 ビ COF me ら 88 

IF ERK=250 THEN PRINT 
IF ERKR=6 
RESUME 130 


テイ キ " サレ マセ ン 。“ 
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THEN PRINT "オー"ー フロ - テ “ ス 。「 


X sk? 100 
y s? 100 

オー ル "ー フロ ー チ ”" ス 。 
XX 2 0 

y アー ク 

テイ キキ” サレ マセ ン 。 
1 の 
Break in 130 
DUk 


au ら に (0 ) 
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一 般 ス テー トメ ント 


指定 され た いく つか の 行 に 分 岐 し ます 。 
ON < 数 式 > GOSUB< 行 番号 >〔, < 行 番号 >…」〕 
ON < 数 式 > GOTO< 行 番号 >〔, < 行 番号 >…) 
文例 ) ON AGOSUB 100, 200, 300 

ON B GOTO 400, 500, 600 





・< 数 式 > の 値 が プロ グラ ム の どの 行 番号 の 行 に 分 岐 す る か を 
決定 し ます 。< 行 番号 〉? の 並び は 1 か ら 始 まる 数 に 対応 し ます 。 
た と えば , < 数 式 > の 値 が 3 で あっ た な ら , 行 番号 の リス ト の 
3 番目 の 行 が 分 岐 点 と な り ま す 。 
*・ < 数 式 > の 値 が 負 に な っ た 場合 に は , "Tegal function call" エ 
ラー が 起こ り ま す が , 値 が 0 また は 行 番号 の リス ト の 個数 よ 
り 大 きく な っ た 場合 に は , 次 の 行 へ フロ グラ ム の 制御 が 移り , 
エラ ー は 起こ り ま せん 。 
・ ON…GOSUB で は , リ スト の 各行 番号 は サブ ルー チン の 先 
頭 の 行 番号 で な けれ ば な り ま せん 。 


100 "entr ッ 

110 INPUT “N ="sN 

120 SG5=SGN( N )+1 

13U UN Sb GOUTO 160。180 

140 PRINT "MINUS!":GOTO 110 
150 “zero 

160 PRINT "ZERO! "GOTO 110 
170 "plus 

180 PRINT PLUS! "skGOUTO 110 
Uk 

ピロ 

N =? 0U 

ZERO! 

N =? 28 アァ 

PLUS ! 

N =? -9897 

MINUS ! 

N =? 

Break in 110 

0k 
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[s] 陣 人 入出 カス テー トメ ント 


フロ ッ ピ ィ デ ィ ス ク 上 の ファ イル を オー プン し ます 。 
OPEN < ファ イル 名 > [FOR< く モード >] AS [ 壮 ] < ファ イル 番 
号 > 


OPEN “2 : TEST” FOR INPUT AS #1 


*〈 フ ァイル 名 > で 指定 され た フロ ッ ピ ィ デ ヂ ディスク 上 の ファ イ 
ル を ,。 指定 され た <〈 フ ァイル 番号 〉 で オー プン し ます 。 以後 , 

OPEN され た だ ファ イル へ の 入出 力 は , < ファ イル 番号 > を 指示 
する 才 だ より 条 り ます 。 

・〈 モ ー ド > は, ファ イル の アク セス 方 法 を 指定 し ます 。 モ ー 
ド に は 次 の 4 種類 が あり ます 。 


INPUT ………… 既存 の シー ケン シャ ルフ ァイル か ら 入 力 を 
行う こと を 指示 し ます 。 

OUTPUT ……… 新 し く シ ー ケ ン シ ャ ルフ ァイル を 作り 出力 
を 行う こと を 指示 し ます 。 

APPEND……… 既存 の シー ケン シャ ルフ ァイル の 終り か ら 


追加 を 行う こと を 指示 し ます 。 
省略 し た と き …FOR 〈 パ モード > が 省略 され る と , ラン ダム 
アク セス を 行う こと を 指示 し ます 。 
・ INPUT, APPEND モー ド で は 指定 され た ファ イル が 存在 し 
な いと , “File not fonnd" の エラ ー と な り ま す 。OUTPUT モー 
ド で は 常に 指定 され た 名 前 の ファ イル を 新しく 作り , 同一 名 
の ファ イル が あっ た 場合 , その ファ イル は 削除 され ます 。 ラ 
ンダ ム ア ク セス で ファ イル が 存在 し な い 場 合 に は 新た に ファ 
1 ル が 作ら れ ま す 。 
・〈 フ ァイル 番号 〉 は , 1 一 15 ま で の 値 を 用 いる こと が で きま 
す が , (Nso)DISK-BASIC を 使い 始め る と き に “How many 
files(0-15)?” で 指定 し た ファ イル の 数 を 越え て は いけ ませ ん 。 
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・ OPEN は , 以後 の 入出 力 の 際 に 用 いる バッ ファ 領域 を 確保 
し , ファ イル が 閉じ られ る まで の 間 , その バッ ファ は , 指定 
し た ファ イル へ の 入出 力 操作 専用 に 使わ れ ま す 。 こ の バッ 
ファ は ファ イル 番号 と 同一 の 番号 で 参照 され ます 。 


カセ ッ ト テ ー プ 上 の ファ イル は オー プン する 必要 が あり ま 
せん 。 





CLOSE, VARPTR, FIELD 





100 “-- テ "ー タ テン ソ 9 フ 7" ログ "ラム ーー 

110 " DSK1: --> DSK2 

120 ^ 

130 OPEN "1:data3" FOR INPUT AS#1 

140 OPEN "2:neudata3" FOR OUTPUT AS 


160 ョ tar セ 

1 70 【F EOF(1) THEN 220 
180 INPUT 梓 1。A ま モ 

190 PRTNT 2。A 和 も 

200 GUTOU 170 

210 "axit 

ZZ0 CLOSE 

230 END 
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OUT INJIN| 特殊 ステ ー ト メン ト 


コン ピュ ー タ の 出力 ボー ト に 1 バイ ト の デー タ を 送り ます 。 
OUT<I/O ア ド レス >, く 数式 


OUT &H30, &H3 


・〈{/O アド レス > は 出力 ポー ト の 番号 , そし て < 数 式 > は 出力 
する 1 バイ ト の デー タ で す 。 
s </O アド レス >. < 数 式 > は 共に 0 一 255 ま で の 整数 で 指定 し 
時 9 


INP PC-8001MKH ユー ザー ズ マ ニュ アル 付録 9 IO マップ 


100 “ou セ tes セ 

110 FOUR IT=1 TO 100 
1 20 OUUT &HAO ,&H2F 
1 30 0UT &HAO ,&HF 
140 NEXI ! 

150 "uait 

160 FOR 【=1 TO 200:NEXT 1 
170 "beep 

180 FOR =1 TO 100 
190 BEEP 1 

Z00 BEEP 0O 

ノ Z10 NEXX[ ] 
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PEEK [ 還 国 特殊 関数 


機 能 ) メモ リ 上 の 指定 され た 番地 の 内 容 を 読み 出し ます 。 
PEEK( < 番地 > ) 
A= テ PEEK( &HDAOO ) 





・< 番 地 > に よっ て 指定 され た メモ リ 番 地 の 内 容 を 与え ます 。 

・< 番 地 > の 二 囲 は 0 一 65535(0Hー FFFFH) まで で す 。 ま 
た , 小数 点 が 含ま れる 場合 , 小数 点 以 下 を 切捨て た 後 で 変換 
を 行い ます 。 


110 INPUT “start agddress(hex) "SA まま 

120 SA=VAL("&H"+SA$ ) 

130 INPUT “and address(hex ) :EA ま 

140 EA=VAL('&H"'+EA$) 

150 CO0=1 

160 “ ョ tar セ 

170 PRINT RIGHT ま ("000 "+HEX も (SA).4)1 7! 5 
180 FOR IL=SA TO SA+15 

190 DA=PEEK( { ) | 

200 PRINT RIGHT ま ("0"+HEX ま (DA)。2)5 
210 NEXT I 

220 SA=SA+16:PRINT 

230 IF SA<=EA THEN 170 

240 END 





ビ い ロ 
st 上 ar も agddress(hex)? 800O 

ロロ address(hex)? 8050 

8000: E6 F1 E9F1 C9 00 C9 0O0 7 23 A9 23 C9 0O C9 0DO 
8010: C9 00 EC9 00 6C900C2 00 C9200 C9 ウ 00 C9 00 CC 00O 
8020: 0UOU0 40 80 6E 00 85 20 22 73 74 61 72 74 20 61 64 
8030: 64 72 65 73 73 28688 657829223B53 41 24 0OQ 
8040: っ 54 80 /8 00 53 41 F1 FF 94 28 22 26 48 22F3 53 
8S050: 41 24 29 00 73 80 82 00 85 20 22 656eE 64 20 20 
0k 
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ININ| グラ フィ ッ ク 関 数 


指定 し た 低 解 像 度 グ ラフ ィ ッ ク 座 標 に ビク セル が セッ ト さ れ 
て いる か いな いか を 与え ます 。 
POINT(Lx, LYy/ 


CL=POINT(60, 60) 


s 指定 し た 低 解 像 度 グ ラフ ィ ッ ク 座 標 に , ビク セル が セッ ト 
され て いる 場合 に は ーー 1。 リ セッ ト さ れ て いた り , キャ ラク 
タ が 表示 され て いる 場合 に は 0 を 与え ます 。 


100 CMD CLS 1 

110 LINE(0,.50)-(159.50),PSET 
120 X=S50:Y=U 

130 IF POINT(X。Y) う =-1 「HEN END 
140 PSET(X ょ Y) 

1 コ 0 Y=Y+1 

160 GOTO 130 
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POKE INJIN| 特殊 ステ ー ト メン ト 


メモ リ 上 の 指定 番地 へ デー タ を 書き 込み ます 。 
POKE< 番 地 >。 < 整数 表記 > 
POKE &HEOO00, &HFF 


・ 指定 され た メモ リ 上 の 番地 に , 1 バイ ト ( 8 ビット) の デー 
クタ を 書き 込み ます 。( た だ し , RAM の 領域 に 限り ます ) 

・ < 整数 表記 > は 書き 込ま れる デー タ で , 0-255(0H-FFH ) 
の 値 で な けれ ば な り ま せん 。 も し 小数 点 以下 が ある と 整数 化 
し て か ら 実 行 さ れ ま す 。 

* < 番地 > は 2 バイ ト の 整数 で , 0-65535(0H-FFFFH ) の 値 
で す 。 た だ し この 命令 は , 現在 の メモ リ の 内 容 を 書き 換え て 
し まう た め , 不用 意 に 使う と BASIC が 使っ て いる 作業 領域 
を 壊し て し まい , 誤動作 の 原因 と な る こと も あり ます 。 使う 
時 に は , メモ リマ ッ プ な ど で 使 用 可能 な 領域 か どう か を 確認 
し て くだ さい 。 

・ POKE の 逆 の 働き を する 関数 と し て PEEK 関数 と いう も の 
も ゃ 用意 さ れ て いま す (PEEK 関数 参照 )。 こ れ ら POKE と 
PEEK は , 効率 的 な デー タ の 格納 や 機械 語 サ ブル ー チ ン と の 
引数 の 受け 渡し な ど に 役立ち ます 。 


PEEK, CLEAR, 付録 B 機械 語 プ ログ ラム の 作り 方 


100 “POKE 

110 CLEAR 300,&HDFFF 

120 “ーー いぬ Fite モ o memOCy ーー 

13U0 FOR AUD=&HEO00 TO &HE00F 

140 POUKE AUU,DA iDA=DA+1 

150 NEXI AD 

160 一 read from memory ーー 

1/ZU FUR AD=&HE000 TO _&HE00F 

180 PRINT _ RIGHT$S( 0"+HEX$(PEEK( ADD ) ) , 4 ) : 
120 NEXT AD 
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9 入出 力 関数 


指定 され た RS-232C 通信 ポー ト の 入出 力 バ ッ フ ァ に 入力 さ 
れ て いる 文字 数 を 与え ます 。 

PORT(< ポ ー ト 番号 >) 

PORT(1) 





・ < ポー ト 番 号 〉 で 指定 され た RS-232C 通信 ポー ト の 入力 
バッ ファ に 現在 何 文字 入力 され て いる か を 知る 関数 で す 。 本 
体内 の RS-232C イ ンタ フェ ー ス を 使用 する 場合 < ポー ト 番 
号 > は 1 を 指定 し ます 。 

・RS-232C 通信 ポー ト の 入出 力 バ ッ フ ァ は 127 文 字 分 あり デー 
タ が その バッ プ ァ の 窒 量 を 越え た 場合 "Communication buffer 
overflow" エ ラー が 起り ます 。 し た が っ て , PORT 関数 で バッ 
ファ が ある 程度 いっ ぱい に な っ た ら INPUT% な ど で デ ー タ 
の 読み 出し を 行っ て くだ さい 。 


100 “" PORT 

110 POKE &H8001 ,&H23:POKE &H8BO000,&H7/F 
120 OUT &HE6,4 

130 OUT &HE4,&HFF 

140 INIT 21.&HFAJ&H3Z 

150 IF PORT(1) THEN_ PRINT 21.ENPUT ま (PORT(1 う 21.)5 
160 GUTO 150 

1 7 "XX※※ デ XX 天光 ※X※※X 天 XX メデ 区 
180 "Af 上 8 ビ exGc ロ 上 ion oOo†T 上 hi= PCOgr8am。 
190 “ type "out &hE6,&hO" 。 

2 人 迷 洋 迷 革 甘 光 革 区区 区区 区区 基 区 基 区 区 区 光 天 天天 天天 
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POS IN] 画面 制御 関数 


テキ スト 画面 上 の 現在 の カー ソル の 水平 位置 を 与え ます 。 
POS(< 式 > ) 
Y ニ POS(0) 
・ こ こ で の < 式 > は 意味 を 持ち ませ ん 。 通常 0 を 使い ます 。 
・ 得 られ る 値 は 0 から そ の と き WIDTH で 指定 し た < 桁 数 > 未 
滴 の 整数 と な り ま す 。 


CSRKLIN, LOCATE, WIDTH 


100 FUR 1T=32 「O0 255 
110 IF POS(0)=>32 THEN PRINT 
1 2Z0 PRINT CHR ま (1)』  「』 





130 ME 上 XT 1 
un 
| 電 呈 多 &&  ( ) ※ 二 。 一 / 
0 1 2 3456Z789 : 』 < く <= ミ > マタ 
GA BCDEFG6HIJKLMNO 
P Q RSTUUVMUMUXYZ ア [上 [ ぎ ] パー 
- abcd コ efghi j」k1mno 
q コ ロビ セロ VM ゅ Mx アァ アァ て リラ う ) ブ 
ーー mm mm 置 半 較 有 | | 有 W 旧 旧 置 軒 十 
た エイ オ ト フ て ーー | | ヒエ ュー ヒコ と SS トッ ィ 
So リー 」 、 ・ ラブ ァ イィ イ の ウ ー エ オヤ 1] ョ ヨ 9 
ー ア イ ウ リエ オカ キク ケリ ココ サ シ シス セ ソ 
タチ ナツ テト ナ 二 叉 ネプ ハル ヒ フフ AA ホネ マ 
ミミ ム メモ ヤ ユ ュ ユ ヨ ラリ ルレ ルレ ロ リン“ 9 
ーF キ オォ オ 4 生ま 参 O グ ノヽ 
X 円 年 月 日 時 分 秘 
0k 


2ー158 


PRESET [NMJINI グラ フィ ックス テー トメ ント 


( 機 能 ) 低 解像度 グラ フィ ッ ク 座 標 (LxLyy の ビク セル を リセ ッ ト し 
ます 。 

上 式 ) PRESET(Lx, Ly )[(, く ファ ンク ショ ンコ ー ド >〕) 

文例) PRESET(100, 50) 





・ 低 解像度 グラ フィ ッ ク に お いて 任意 の ビク セル を リセ ッ ト 
し ます 。 

。 ここ で の < ファ ンク ショ ンコ ー ド > は 意味 を 持た ず , 通常 指 
定 し ませ ん 。 

注 意 ) PRESET は COLOR で 指定 され る 〈 く グラ フィ ックス イッ チ ナ >〉 が 
ON の 状態 で 使用 し て くだ さい 。 





PSET, COLOR, CONSOLE 


100 CONSOLE ,,0,1 
110 PRINT CHR*$(12) 
120 FOR I=0 TO 2?0 
1 30 PSEIK 1 1 ) 
140 じ = し + ォ 1 

150 C=C MOD 8 
160 下 民 選 呈 世 下 (上 L ) 
170 NEXI 1 
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PRINT/LPRINT 入出 力 ス テー トメ ント 








1) テ キス ト 画 面 に 情報 を 出力 し ます 。 
2) プ リン タ に 情報 を 出力 し ます 。 
1) PRINT〔< 式 >…]〕 

2) LPRINT〔< 式 >…] 

PRINT “ABC" 


・ 指 定 し た 式 の 値 や 文字 列 を 1) は ディ スプ レイ 画面 に 2) は 


プリ ジグ に 出力 し ます 。 


・ や > が 省略 され て いる 場合 は 改行 の み を 行い ます 。 式 の 値 
や 文字 列 を 表示 する 領域 は あら か じ め 各 行 を 14 文 字 毎 に 分 
害し て 定め られ て お り , 式 の 区 切り 記号 に コン マ を 使う と 次 
の 信 域 の 始め か ら , また セミ コロ ン を 使う と 直前 に プリ ント 
し た も の の すぐ 後ろ に 続い て 次 の 式 ( 値 や 文字 列 ) が 表示 され 
ます 。 区 切り 記号 と し て 空白 “へ "を 用 いた 場合 も セミ コロ ン 
と 同様 の 働き を し ます 。 

・ で の 最後 に も セミ コロ ン 及 び コ ンマ を 指定 する と 改行 動作 
を お こさ す , その 行 で 次 の PRINT に よる 出力 を 続行 し ます 。 
変数 と "で 囲ま れ た 文字 列 と の 区 切り に 限っ て 
- 公 "を 省略 する こと が で き , この と き は セミ コロ ン と 同様 の 
働き を し ます 。 

・ 数値 を 表示 し た 場合 その 後ろ に 必ず 空白 が 一 つ 挿入 され ま 
す 。 ま だ, 数 の 前 に 符号 の た め の 桁 を 確保 し ます 。 単 精度 の 
数 個 で , 指数 形式 で な く て も 6 桁 以下 の 桁 数 で 精度 に 影響 を 

及ば さす 表示 で きる も の は , 実数 形式 で 表示 され ます 。 
同様 に 億 精度 の 数 値 は 16 桁 以下 の 桁 数 で 精度 に 影響 を 及ば 
す 表 示 で きる も の は , 実数 形式 の 表示 に な り ま す 。 

・ こ の 合 令 の キー ワー ド *PRINT" の 簡略 形 と し て 疑問 符 ( ? ) 
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を 使用 する こと が 許さ れ ま す 。 

・ 表 示す る 文字 列 の 長 さ , 数 値 の 長 さ が 現在 の カー ソル の 位 
置 より 後方 に と れ な い 場 合 ( そ れ を 表示 する と 次 の 行 に わ 
た っ て し まう ) 改 行 し て それ を 表示 し ます 。 





100 FOR 1=2 TO 1 

110 FOR J=U 1T0 13 

1 20 PRINT CHR ま (TX※16+J) 5SPCKZ)5 
1 30 NEXT J 

140 PRTINT 

150 NEXT 1! 

160 END 


Pu 





〇 つう へ 


> DU 
テト ン と * 


DIl 


U 
主 と Q と の < ヽ 」 い ヽ 


| 較 上 ⑩0 ご PT SS 
Fr NN ーー ト 4 し 0 * ゃ < 氷 


ト | 


aracoscm 


中 


旭 デ ー ゴ コー く ピー で ーー ン 
W ロ キサ ー し 貴 へ 色相 大 = 十 
O ロ プロン ッ 瑞 い と ご ヨ コロ ゴマ | 


m ロ ナー コロ サ に と に 本 店 0 0 CO の ()0) 立 
w ちと 圭 ロロ / 馬 * コ 
に 


蜂 上 口 は コー 蘭 く て 十 イ ロ ひ % 


ゴジ ど や Jo 1 ロ p の アビー 
着 士 学 ヘ コ ユー うけ て の トド) ・ 


〇 つう 守 ルナ い 

こく へ | | 
加 四 オテロ < 
紀 本 ロー キー トー* 
層 坦 山 央 せ ュ 
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PRINT 十 


機 能 


計 )  [ 唱 
連 


IN [IN| 入出 力 ス テー トメ ント 


ンー ケン シャ ルフ ァイル に デー タ を 出力 し ます 。 
PRINT 革 < ファ イル 番号 >, [< 式 >…]〕 

< ファ イル 番号 > が 1--15 の と き は | 
PRINT せ 2, A, B, C 


* く ファ イル 番号 > は , その シー ケン シャ ルフ ァイル を OPEN 
に よっ て オー ブン し た と き に 指定 し た 番号 で す 。 また , < ファ 
イル 番号 > に 一 1 を 指定 する と , カセ ッ ト テ ー プ へ の 出力 と 
な り ま す 。 なお, この 場合 ファ イル を オー ブン する 必要 は あ 
りん 。 
・ < は ファ イル に 書き 込ま れる 数 値 式 また は 文字 式 で す 。 
PRINT 韻文 を 実行 し て ,。 も し バッ ファ が 一 杯 こなれ ば 書き 出 
し , エン ド オ ブフ ァイル に な っ て いな けれ ば 次 の レコ ー ド を 
バッ ファ へ 読み 込み ます 。 
・ PRINT 電 は デー タ の 圧 緒 を 行わ ず , PRINT で 画面 へ 出力 
する も の こ 全 く 同 じ も の を 出力 し ます 。 で すか ら こ れ ら の 
デー タ が フロ ッ ピ ィ デ ィ ス ク や カセ ッ ト テ ー プ か ら 正 し く 入 
力 で きる よう に , 書き 込む ゲー タ は 適切 に 区 切ら れる よう に 
MC S AS SU) 
・< 式 > の リス ト の 中 の 数 値 式 は セミ コロ ン で 区 切る よう に し 
て くだ さい 。 例え ば , 
PRINT 半 1. A: B: C: XX Y: Z 

(も し 区 切り の 記号 に コン マ を 使う と ブリ ント 領域 の 間 に 挿 
入 さ れる 余分 な 空白 も 媒体 に 書き 込ん で し まい ます 。) 

リス ト の 中 の 文字 列 も セミ コロ ン で 区 切っ て くだ さい 。 媒 
体 上 に 文字 列 を 正しく 書き 込む た め に は , < 式 > の リス ト の 中 
に 独立 し た 区 切り 記号 を 入れ て くだ さい 。 
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例 を あげ る と , A$ テ “CAMERA" そし て , B$= テ “93604-1" 
の と き の 次 の 文 
PRINT 1 A$ : B$ 
は ディ スク に CAMERA93604-1 と 書き 込み ます 。 こ れ は 区 
切り 記号 が あり ませ ん か ら 2 つの 別 の 文字 列 と し て 入力 する 
こと は で きま せん 。 こ の 問題 を 解決 する に は , 次 の よう に 
PRINT 電 中 に 独立 に 区 切り 記号 を 入れ て くだ さい 。 
PRINT# 半 1 A$ :“  ": BS$ 
これ か に に 上 っ ら て ディ スク に 書き 込ま れる イメ ー ン は , 
CAMERA. 93604-1 
と な り , 2 つの 文字 変数 と し て 読み 込む せこ と が で きま す 。 
も し 文字 列 そ れ 自 身 が デー タ と し て コン マ 。 セミ コロ ン 。 
意味 の ある 空白 ,。 キャ リッ ジリ ター ン , また は ライ ン フ ィ ー 
ド な ど を 含む 場合 は , 別 の 引用 符 , CHR$(34) に よっ て 囲ん 
で ディ スク に 書い て くだ さい 。 
例 を あげ る と , A$=“CAMERA, へ AUTOMATIC", B$= 
“へ ヘ へ へ 93604 一 1”" の と き , 次 の 文 , 
PRINT せ 1. A$ : B$ 
は 次 の よう な イメ ー ジ を ディ スク に 書き ます 。 
CAMERA へ AUTOMATIC へ へ ム へ 93604-1 
そし て 次 の 文 , 
INPUT 1 A$, B$ 
は , “CAMERA" を A$ に, そし て “人 へ AUTOMATIC へ へ ム 
93604-1”" を B$ に 読み 込み ます 。 こ れ ら の 文字 列 を フロ ッ 
ビ ピ ィ ディ スク 上 で 正しく 分 割 す る に は , CHR$(34) に より 引 


用 符 を フロ ッ ピ ィ イィ ディス ク に 書き 込ん で くだ さい 。 次 の 文 , 
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PRINT 壮 1. CHR$ (34) : 
CHR (34) : B$ : CHR$(34) 


A ゃ : CHK$(34) : 


は 次 の 内 容 を ディ スク に 書き 込み ます 。 


“CAMERA" "へ AUTOMATIC へ へ へ 93604-1" 


する と 次 の 文 , 


は CAMERA, を A$ に , 


INPUT 半 1.A$. B$ 


作 AUTOMATIC へ へ へ 93604-1 を 


B$ に 読み 込み ます 。 


PRINT 韻 は , USING と 共 


に 使っ て ディ スク フ ァイル の 


フォ ー マ ッ ト を 制御 する を がめ でき Ez 


INPUT 井 , OPEN. PRINT 井 USING 


70 
380 


P Fi 


UPEN 


| OPEN 
| INPUT #1 DA$,TIS 
| PRINT "ヒス *7 < 
) PRINT 


PRKINT NA$BjTAB(10)jPL:"x" 


ーー Sequen モ ia] data urite 一 一 
デ 


3 モ =8 。da セ †" F UK 0UUTPUT AS 昔 1 
PRINT 信 1 DATE$S:』 | 。” TIME も も 
~ aa り じ ュ @ 
INPUT “ヒン メイ " :NA$ 
IF NAS= "end” THEN 220 
INPUT “カカ ク " PL 
INPUT “コス 9"jN シ を 


PRINT 析 1。NA も 』 。 jjPLiN 
) GOTU 150 


"xi 1 
PRINT :CLOSE 

ーーー Sequen モ ial data read ーー 
TT=0 
tsst da 上” FOR INPUT AS#1 
DA も 。" シ "カン : ":T1$ 
"da モ ta read 

IF EOF(1) THEN 370 

INPUT 欄 1 。NA*,PL ,N シ 
SU=PL XN と 
2N シ > = SU 
T 1 = 上 +SU 
GOUTO JU0 

"xi モク 
PRINTk:PRINT "TOTAL =" 
END 


% 上 


ヒン メイ 7 チョ コレ ー ト 
カカ ク 7 2Z っ 0 


コン 6 


っ 


ヒン ソン メイツ チー ス ”" か ー キ 
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カカ クツ 300 

ョ AX97 邊 

ヒン メイ アニー リ イン 

カカ ク ? 3000 

コス 9? 1 

ヒン メイ ツウ and 

ヒス " ケ 』 83/01/03 シ ^ カ ン s: 22:26k23 
チョ コレ ー ト 250Q % 3 50 

チ ナース ~ ケー キ 300 * 5 1500 
ワイン 3000 %※ 1 = 3000 
TOTAL = 5250 

Ok 
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PRINT2 [NIIN| 入出 力 ス テー トメ ント 


RS-232C 通信 ボー ト の 入出 力 バ ッ フ ァ に デー タ を 出力 し ます 。 
PRINT%< ポ ー ト 番号 >, (< 式 >……〕 
PRINT 1 A, B 


有 解説 ) ・< ポ ー ト 番号 > で 指定 され た RS-232C 通信 ポー ト の 入出 
カカ バッファ に デー タ を 出力 し ます 。 使い 方 は フロ ッ ピ ィ デ ィ ス 
ク へ 出力 する PRINT# と 同じ で す 。 
*・〈 ボ ー ト 番号 〉 は 本 体内 蔵 の RS-232C イン タフ ェ ー ス を 使 
用 する 場合 に 1 を 指定 し ます 。 


INPUT%. INIT% 


2 100 "一 - print 冬 tesg 七 一 一 ー 
( 110 POKE &H8001.&H23:POKE &H8000 ,&H7F 
120 OUT &HE6,4 
130 OUT &HE4.&HFF 
140 INI「 21.&HFA,&H37 
150 LINE INPUT "message?" 3 ム A ま 
160 IF A ま ="end'" THEN OUT &HE6,0:END 
170 PRENT 1 , ぬ も 
180 GOTO 150 
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PRINT USING/LPRINT USING [MIN 
入出 力 ス テー トメ ント 


文字 列 。 数値 を 指定 し た 書式 で 出力 し ます 。 


PRINT oo 1 
LPRINT |. 


PRINT USING “ 壮 壮 壮 壮 ,. #"5 AB 


は 


< 式 >…)( 














< 書式 制御 文字 列 ? に よっ て 後に 続く < 式 〉 の 出力 され る 領域 
や 書式 を 決定 し ます 。 
文字 の 書式 制御 

1 …… 与 えら れ た 文字 変数 や 文字 定数 の 最初 の 1 文字 だ け 
出力 し ます 。 

&<n 個 の へ (空白 )?&…… 与 えら れ た 文字 変数 や 文字 定数 
の 先頭 か ら (n 十 2 ) 文 字 の 文字 列 を 出力 し ます 。 写 えら れ た だ 
文字 列 が (n 十 2 ) 文字 よ り も 長い 場合 は , 余分 な 文字 は 無視 
され 。 短い 場合 に は , 文字 列 は 左 づ め に 出力 され , 残っ た 部 
分 に は 空白 が 出力 され ます 。 

致 條 の 書式 制御 

#…… 数 値 を 出力 する 桁 数 を 指定 し ます 。 指定 し た 桁 数 よ 

り 数 値 の 桁 数 が 小さ いと き に は , 右 づ めで 出力 され ます 。 
… の "小数 点 の 位置 を 指定 し ます 。 小 数 点 以 下 の 部 分 で 
冗長 と な る 桁 に は 0 が 出力 され ます 。 

十 ……< 書 式 制御 文字 列 〉 の 最初 また は 最後 に 付け た 場合 , 
数 値 の 符号 が それ ぞ れ 前 また は 後に 出力 され ます 。 2 個 以上 
の “ 十 " を 並べ た 場合 に は , 余分 は 後述 の 制御 文字 以外 の 文字 
と 同じ 扱い に な り ま す 。 

ー……< 書 式 制御 文字 列 〉 の 最後 に 付け た 場合 数値 が 負 の 
数 の 時 に 数 値 の 後ろ に "ー" が 出力 され ます 。 前 に 付け た り , 
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2 個 以上 並べ た 場合 に は 後述 の 制御 文字 以外 の 文字 と 同じ 扱 
い に な り ま す 。 

書式 制御 文字 列 〉 の 先頭 に つけ た 場合 。 数 値 領域 
の 左側 に 空白 部 分 が で きた と き , そこ を “*" で 埋め て 出力 し 
ます 。 こ の "※* "は 2 桁 分 の 領域 を 確保 し ます 。 

\\……< 書 式 制御 文字 列 〉 の 先頭 に つけ た 場合 , 出力 され 
る 数 値 の 直前 に “\ せ ” を 出力 し ます 。“ 半 "は 2 桁 分 の 領域 を 確 
保 し ます が , この うち 1 桁 分 は “ 平 " の 出力 領域 と し て 使わ れ 
ます 。 後述 の 指数 形式 の 書式 指定 を 行っ た 場合 に は , 正しく 
出力 され な い 事 が あり ます 。 

まま 学 ……( 書 式 制御 文字 列 〉 の 先頭 に つけ た 場合 ・ 上 記 の 
2 つ (※*※ ま と \\) の 両方 の 機能 と な り ま す 。“※※ 辛 "は 3 桁 
分 の 領域 を 確 供し ます が , この うち 1 桁 分 は “ 壮 " の 出力 領域 
こし て 使わ れ ま す 。 

の 析 数 指定 の " 半 の 並び の 中 に お いた 場合 数値 の 整 
名 3 桁 毎 に “で 区 切ら れ て 出力 され ます 。 但 し, “." よ 
り 石 側 に お いた 場合 は , 数 値 の 最後 に "," が 出力 され , 3 桁 
毎 の 区 切り は 行わ れ ま せん 。 

この の の 数 指定 の "の 後に 付け た 場合 , 数 値 は 
指数 形式 で 出力 され ます 。 


制御 文字 以外 の 文字 

以上 の 制御 文字 以外 の 文字 ( 英 数 字 . カナ , グラ フィ ッ ク 
記 写 寺 ) を 置い た 場合 , 数 値 の 前 や 後ろ 2 に その キャ ラク タ が 
出力 され ます 。 
致 値 の 領域 を こえ た 場合 

指定 し た 数 値 領域 より 数 値 の 桁 数 が 大 きい 場合 , 数 値 の 直 
前 に "% が 出力 され ます 。 数値 の 丸め が 領域 より 大 きく な る 
原因 と な っ た 場合 も , 丸 め た 数 値 の 前 に “%” が 出力 され ます 。 
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100 
110 
120 
130 
140 
1 っ 0 
160 
170 
180 
190 
Z00 
Z10 


PIT1 


PRINT 
PRINT 
PRINT 
PRKINT 
PRKINT 
PRKINT 
PRINT 
PRINTI 
PRKINT 
PRINT 
PRKINT 
END 


US ING 
US ING 
US TING 
US ING 
US1NG 
USING 
US1NG 
US TNG 
US TING 
USING 
US TNG 


N 
NEC PC-8001MK」L 
1 2 コ 
123、。 ら 
+123. っ 

1 23 。 コ ー 
%※123。 っ 
呂 123.5 
※\123。 つ 

1 。234 .6 
を 1 23436 


Uk 


"5 "NEC PC-8001MK]E “ 
-& &" "NEC PC-8001MK]JE " 
” 相 栖 揚 匠 村 " 123.456 

"菩提 提 寺 。 柱 " 123。456 

" 十 林 提 拉 析 。 "123.456 

” 梓 杜 料 柏 半 。 革 -~*ー123.456 
"区 区 菩 柏 培 。 井 :123。456 

” 半 半 梓 析 。 柱 "*123。456 

"区 ※ 半 村井 。 井 :123。456 

" 村 祝 福井 村 。。 提 "1234 .56 
"菩提 韻 相 菩 " *123456! 


2ー169 


PRINT せ USING [INJIN| 入出 力 ス テー トメ ント 


文字 列 。 数値 を 指定 し た 書式 で ファ イル に 出力 し ます 。 


PRINT せ < ファ イル 番号 > USING< 書 式 制御 文字 列 
本 





〈 フ ァイル 番号 〉 が .1 15 の と き は [ 同 


PRINT サ 2, USING “ 半 キ せ "jA 
解説 


・< フ ァイル 番号 > で 指定 され た ファ イル に 対し て , 文字 列 や 
数 値 を 書式 指定 し て 出力 し ます 。 

・ PRINT 半 USING は , その 対象 が ファ イル で ある こと を 除 
け ば PRINT USING と 全く 同じ で す 。 


PRINT USING, PRINT 半 , OPEN 


7 100 OPEN "stes モ da も FOR OUUTPUT AS 1 
110 FUR 1=0 「O0 10 

1 20 PRINT #1.USING 立 拉 杜 ':1 2 

130 NEXT ! 

140 CLOSE 

13U END 
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PSET グラ フィ ックス テー トメ ント 














低 解 像 度 グ ラフ ィ ッ ク 座 標 (Lx,Ly) 上 の ビク セル を セッ ト し 
ます 。 
PSET(Lx。 Ly【(, く ファ ンク ショ ンコ ー ド >]〕) 


PSET(100, 50, 7 ) 


・ 低 解像度 グラ フィ ッ ク 座 標 (Lx, Ly) に ピク セル を セッ ト 
康生 

< オプ ショ ン の <〈 く ファンク ショ ンコ ー ド >〉 は COLOR に 用 いる 
場合 と 同じ で , カ ラー モー ド の 時 は 色 を 指定 する こと が で き , 
白黒 モー ド の 時 は リバ ー ス な どの 機能 を 指定 する こと が で き 
9 6 


PSET は , COLOR で 指定 され る < グラ フィ ックス イッ チ >〉 が 
ON に な っ て いる 状態 で 使用 し て くだ さい 。 


PRESET, COLOR, CONSOL 


100 MIDTH 80,2Z っ 
110 CONSOLE 」。,1 
120 CMD CLS 1 

130 FOR I=0 TO 20 
1 40 PSET( 1 し) 
1 っ 0 じ に =1 MODU 
160 NEXT 1 
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PUT [slIMIN) 入出 力 ス テー トメ ント 


機 能 ) バッ ファ 中 の デー タ を ラン ダム アク セス ファ イル に 書き 出し 
ます 。 
PUT[ 斗 〕] < ファ イル 番号 >〔, < 数 式 > 


文例) PUT#3,5 





・ PUT は く フ ァイル 番号 〉 で 指定 され た バッ ファ の 内 容 を ラ 
ンダ ム フ ァ イル へ の 書き 込み と し て 働き ます 。 指定 され た 
ファ イル は , ラン ダム ファ イル の モー ド で オー プン され て い 
な けれ ば な り ま せん 。 

* (数式 > は ファ イル の レコ ー ド 番号 と し て 解釈 され . バッ 
ファ 中 の デー タ 256 バ イト が 指定 され た レコ ー ド に 書き 込ま 
れ ま す 。 レ コー ド 番 号 が 省略 され た 場合 , 直前 に 行わ れ た 
GET, PUT で 参照 され た レコ ー ド の 次 の レコ ー ド に 書き 込ま 
れ ま す 。 な お , 書き 出す デー タ は 予め FIELD, LSET/RSET に 
より 準備 し て お か ね ば な り ま せん 。 


OPEN, FIELD, GET, LSET/RSET, PC-8001MKI ユー ザー ズ マ 
ニュ アル 第 8 章 





の 100 “-- random da モ ta いい Fite 一 一 
" 110 OPEN "1:data1" AS 幕 1 

120 FIELD 半 1.30 AS A ま も 。20 AS B。50 AS C$ 
130 "ent も F ッ 
140 LINE INPUT "NAME? ">NA ま ま 
150 IF NA ま ="end”" THEN 240 
160 LINE INPUT “TEL?" 3 和 TL ま ま 
170 LINE INPUT "ADDRESS? " : AR$ 
180 LSE T A ま =NA$ 
190 LSET B ま =TL も 
2Z00 LSET C も =AR ま 
210 PUT 昔 1 
220 GOTO 140 
230 "exi セ 
240 CLOSE 
ビ い ロ 
NAME アコ マツ > か " キ 
TEL?01-234-5678 
ADDRESS? ト ウキ ョ ウト ミナ トク 
NAME タタ ケタ ^ ヒロ シ 
TEL?098- ア 65-4321 
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ADUDRESS 々 ? カ ナカ“~ ワケ ン ヨコ ゴル マラ 
NAME? ア タカ キ “ 
TEL?124-816-3264 
DDRE SS? タ オオサカ フ オオ サカ シ 
NAME?end 

Uk 
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PUT@ 
解説 


NjIN| グラ フィ ックス テー トメ ント 


GET @ で 配列 へ 読み 込ん だ キャ ラク タ や 低 解 父 度 グラ 
フィ ッ ク バ ター ン を 画面 の 任意 の 位置 へ 表示 し ます 。 


1 ) 1 XY リー(| X2。 Y2 |),< 配 列 名 > < 機能 > 
Lxi, LY1 Lx2, LV2 


2) PUT@A(Xi, Yi) 一 (X2, Y2 ) , < 配列 名 > 
PUT@(20, 20) 一 (30, 24 ) G%%, PSET 











1) GET @ で キャ ラク タ と し て 配列 ヘ へ セーブ し た も の を 表示 
させ る 場合 水平 位置 Xi X。 は 0 一 (1 行 の 桁 数 ) 一 1 まで, 垂 
直 位 置 YiYz は 0 一 (画面 の 行 数 ) 一 1 まで の 値 を と り ま す 。 
そし て < 機能 > に は 色 や ブリ ンク な ど を 指定 する た め の く < ファ 
シグ ジョ ンー の 生 く この で きき すす 。 

GET@ で 低 解像度 グラ フィ ッ ク パ ター ン と し て 配列 ヘ セ ー 
フ し た も の を 表示 させ る 場合 の Lx, Lx は 0 か ら ( 1 行 の 桁 
鐘 )※2 一 ] まで の 値 ,Ly, Ly, は 0 一 (画面 の 行 数 )*4 一 1 
まで の 値 を と り ま す 。 そ し て < 機能 > に は PSET, PRESET. OR. 
AND, NOT, XOR の いす ずれ か を 指定 し な けれ ば な り ま せん 。 
OR, AND, XOR は 配列 の デー タ と 画面 上 に 表示 され て いる も 
の この 間 で 論理 演算 を 行い ます 。 論理 値 は 表示 され て いる ピ 
クセ ル が 1 と な り 配 列 中 の デー タ も ビク セル が ある と ころ が 
1 となり ま す 。NOT は 配列 内 の デー タ を 反転 し て 表示 し ま 
す 。 

GET@A で セー ブ し た 配列 を A の 付か な いこ の 書式 で 表示 
き 電 る と で ば で きま せん 。 

2) GET @ 文 の 書式 3) の 方 法 で セー ブ し た も の を 表示 させ る 。 

水平 位置 X, X。 は 0 か ら (1 行 の 桁 数 ) 一 1 まで の 値 , 垂 
自 位置 Yi, Y。 は 0 から (画面 の 行 数 ) 一 | まで の 値 を と り ま 
す 。 色 な ども セー ブ し た 時 点 の も の を 自動 的 に 与え ます 。 
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GET @ 文 の 書式 1) で セー プ し た も の を この 書式 で 表示 する 
こと は で きま せん 。 





100 UIM 6G を (100) 
1Z0 BET@(0.0)-(10,.10),.6%,6 
130 PUT@(100,50)-(110,60),6 を ,PSET 
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READ |NJIN| 一 般 ス テー トメ ント 


能 ) DATA 文 より 値 を 読み 。 変 数 に 割り 当て ます 。 
_ 式 ) READ< 変 数 名 リス ト > 





・ READ は いつ で も DATA と 組み 合わ せ て 使わ な けれ ば な 
り ま せん 。READ は DATA の デー タ を 1 対 1 に 対応 させ て 変 
数 に 割り あて て いき ます 。READ の 変数 は 数 値 変数 で も 文字 
変数 で も か まい ませ ん 。 し か し 読み 出さ れ た 値 と 変数 の 型 は 
一 致し て いな けれ ば な り ま せん 。 もし, 型 が 一 致し な い 場 合 
に は , “Syntax error" が 起り ます 。 

* 1 つの READ が 1 つま た は それ 以上 の DATA を 参照 し た 
り (複数 の 場合 は 順番 に 参照 され ます ), また いく つか の 
READ が 1 つの DATA を 参照 する こと が で きま す 。 も し < 変 
鐘 名 リス ト > の 変数 の 数 が DATA の デー タ の 個数 を 越え て し 
まっ た だ 場合 は , “Out of DATA" の エラ ー メ ッ セ ー ジ が 表示 さ 
れ ま す 。 指定 され た 変数 が DATA の デー タ の 個数 より も 少 
な い 場 合 に は , その 次 の READ が 読ま れ な か っ た デー タ か 
ら 読 み 始 め ま す 。 も し それ 以上 READ が な い 場 合 に は , 余 
分 の デー タ は 無視 され ます 。 

・ 復 数 の DATA か ら READ に よっ て 読む DATA を 指定 する 
に は RESTORE を 使い ます 。 








KRESTORE, DATA 


4 100 FOR 1=0 TO 10 
ロダ る 110 READ A 
120 BEEP 1zBEEP 0 
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170 FOR 1=1 TO 50 

180 BEEP 1 

190 FOR J=I TO 50 

200 BEEP 0 

210 NEXT J,1 

220 END 

230 DATA 10,9,.8。7,6,5,4。3。2。1.0。′ 。 FIRE!" 


PU 
10 9 8 7 ee 5 4 3 2 1 0 FTIRE! 
Ok 
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REM INJ[N| 一 般 ス テー トメ ント 








プロ グラ ム 中 の 注釈 で す 。 
REM〔< 注 釈 文 >〕 

REM * * TEST PROGRAM * * 
'"※ ※ ま TEST PROGRAM* * 


・ REM は ユー ザ が フロ グラ ム を 見 や すく し た り コ メン ト 
を 書い た りす る た め に 使わ れ , フロ グラ ム の 実行 に は 全く 影 
入 を お よ ば し ませ ん 。 

・ REM は GOTO, GOSUB の 飛 先 の 目印 こし て 使う こと が で 
きま す 。 

* キ ー ワ ー ド “REM" の 備わり に アポ スト ロフ ィ ー(〔(") を 使う 
oeUPPCY SN 

・ REM で は , コロ ン (: ) も 注釈 の 一 部 と な り ま す の で , コ 
ロン で 区 切っ て 他 の 文 を 続け る こと は で きま せん 。 

・ REM は BASIC に よっ て 実行 され る 文 の 後に コロ ン で 区 
妨 っ て 付け 加え る こと が で きま す 。 


100 REM スズ テー トメ ント ニ ヨウ 9 テ 
110 REM フ " ロ ク " ラ ム / ナカ ニ こ 

120 REM コメ ント カ " カケ マス 。 

130 REM 

140 REM 八 コ / レイ / 3 ヨ 9 こ 
150 … "テテ " タダ" イ ヨウ テ " キ マス 。 
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REMOVE 





書式 
(文例) 








[gl 人 入出 力 コ マン 


フロ ッ ピ ィ デ ィ ス ク に 配置 表 (FAT) を 書き 込ん で フロ ッ ピ イィ 
ディ スク の 入出 力 を 終了 し ます 。 
REMOVE(< ド ライ ブ 番 号 > 〔, く ドラ イブ 番号 >……〕] 


REMOVE 1 


・ REMOVE は MOUNT の 逆 の 動作 を し ます 。 フ ロッ ピ ィ ディ 
スク を ドラ イブ か ら 取 り 出 す 前 に 必ず 実行 し な けれ ば な り ま 
に 4 

・ REMOVE を 実行 する と 現在 メモ リ 上 に ある 配置 表 (FAT) 
を . コピ ー と 合わ せ て 3 組 , フロ ッ ピ イデ ヂ ディス ク の ディ レク 
トリ トラ ッ ク に 書き 込み 。 MOUNT と 同じ よう に 誤り を 検出 
し ます 。 


・ フ ロッ ピ ィ ディ スク の 入出 力 を 終了 し , ドラ イブ か ら フ ロッ 


ピ イ ディ スク を 取り 出す と き は , 必ず REMOVE を 実行 し て 


くだ さい 。 

も し , REMOVE の 実行 を し な か っ た 場合 , 取り 出し た フロ ッ 
ビ ピ ィ ディ スク の 配置 表 FAT) は 更新 と 誤り 検出 が 行わ れず すず, 
また その ドラ イブ に 入れ られ た 次 の ディ スケ ッ ト に は 誤っ た 
配置 表 が 書き 込ま れ て し まい 両方 の フロ ッ ヒ ピ ィ ティ スク の 配 
置 表 FAT) が 破壊 され て し まい ます 。 

・NsoDISK-BASIC で は オー トマ チッ ク MOUNT, REMOVE 
を 採用 し て いる た め , これ ら の 操作 は すべ て BASIC が 管理 し ま 
す 。 た だ し Nso DISK-BASIC で REMOVE を 実行 し て も エラ ー 
は 起り ませ ん 。 

MOUNT 


に emove 1 
Uk 
に ら 岬 O ソ G 


Uk 


2ー1 / ツ 


RENUM 一 般 コ マン ド 








プロ グラ ム の 行 番号 を 整理 し ます 。 
RENUM[< 新 行 番号 >]〔, < く 旧 行 番号 >] [, < 増分 >〕 
RENUM 1000, 100 





・〈 新 行 番号 >? は , 新しく つけ る 行 番号 の 最 
略し た と き は 10 で す 。 

・〈 旧 行 番号 > は, 行 番号 の つけ 替え を は じ め る 現在 の プロ グ 
フ ム 行 番号 で す 。 省 略し た と き は その プロ グラ ム の 最初 の 行 
番号 で す 。 

・〈 達 分 > は 新しく 付け る 各行 番号 の あい だ の 増分 で , 省略 し 
た だ とき は 10 で す 。 

RENUM は ば は, GOTO, GOSUB, ON … GOTO, ON … GOSUB 及び 
ERL な ご で 参照 し て いる 行 番号 も 新しい 行 番号 に 対応 し て 変 
更 し ます 。 こ れ ら の 文 が 参照 し て いる 行 番号 の 行 が RENUM 
を 実行 する 前 の ブロ グラ ム 中 に 存在 し な い 場 合 に は , “Unde。 
fined Line xxxxx in yyyyyY の エラ ー メ ッ セ ー ジ が 表示 され ま 
す 。 こ の 場合 , 存在 し な か っ た 行 番号 (xxxxx) は RENUM に 
よっ て 変更 され ませ ん が , その 文 の 新しい 行 番号 (yyyyy) は 
妥 更 され ます 。 


RENUM は ブロ グラ ム 行 の 順序 を 入れ 変え る の に 使用 する こ 
と は で きま せん 。( た と えば ,10, 20, 30 の 3 つの 行 が ある 場合 , 
RENUM 15, 30 で 10, 15( も と の 30 行 ),) 20 と する こと は で きま 
せん )。 ま た 65529 以 上 の 行 番号 を 発生 する こと も で きま せん 。 
この よう な 場合 “Tegal function call" エラ ー が 起こ り ま す 。 


2 一 180 


1 1 

100 “ RENUM コマ ント " 八 シテ イラ シタ キ " ョ ウ カラ 

110 “" キ も " ョ ウ 内" ンコ ゴ " ウ ラ ツケ カエ マス 。 

120 

130 PRINT “" RENUM コマ ント " 八 シテ イシ タ キ ま " ョ ウ カラ " 
140 PRINT ” キ " ョ ウ "ンコ " ウ ヲ ゆか カ T マス 。" 





150 END 

Uk 

Penum 200,130 ,20 
0Uk 

1 1 ほ 


100 “" RENUM コマ ント " 八 ラテ イタ キ " ョ ウ カラ 

110 " キ も キ " ョ ウ "ンコ "9 ヲ ツ か カエ マス 。 

120 “ 

200 PRINT " RENUM コマ ント " 八 ラテ イミ タ キ " ョ ウ カラ " 
220 PRINT ” キ も " ョ ウ 敗 "ンコ " ウ ラ ゆか カエ マス 。" 

2Z40 END 

0k 
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RESTORE 一 般 ス テー トメ ント 


機能 ) "READ で 読む DATA を 指定 し ます 。 
書式 ) RESTORE(< 行 番号 >) 
文例 ) RESTORE 800 


・ <〈 行 番号 > を 指定 する と , 指定 され た 行 以降 の DATA の 内 
容 か ら 読 み 始め ます 。 < 行 番 号 〉 を 省略 し た と き は , ブロ グラ 
ム 中 の 最初 の DATA の 内 容 か ら 読 み 始 め ま す 。 








110 RESTOURE 

120 READ DU,E,F 
130 RESTOURE 220 
140 READ A$,B ま も , じ ま も 
150 PRINT A,B,C 
160 PRINT _ D,E,F 
170 PRINT A$,B 和 も, しじま ま 
180 END 

190 DATA 1.2,3 
200 DATA 4,5,6 
210 "tring data 
220 DATA aa,bb,cc 


Un 
1 ノ づ 
1 ノ づ 
88 bb ここ て 
Uk 


RESUME [MIN| 特殊 ステ ー ト メン ト 


能 


計 | | 嘩 
避 ML 3 


E 
| 悪 





エラ ー 回 復 処理 終了 後 , プロ グラ ム の 実行 を 再開 し ます 。 


RESUME 


| 〔O] 
| NEXT 
1 く 行 番号 > | 








RESUME 0 
RESUME NEXT 
RESUME 1000 


・ RESUME は , ON ERROR GOTO に よっ て エラ ー 処 理 ル ー 
チン に ジャ ンプ し た あと , プロ グラ ム の 実行 を 再開 する 場合 
に 用 いま す 。 
・ ブ ログ ラム の 実行 を 再開 する 場所 に 応じ て 次 の よう に 3 つ 
に 書式 を 選ぶ こと が で きま す 。 


RESUME [0] ……(… 


RESUME NEXT …………… 


RESUME <〈 行 番号 〉 …… 


ON ERKRKOR GOTO 


100 ON ERROR _ GOTO 170 

110 "en モッ | 

120 INPUT XJY XY 

1 30 ム ニ X/Y 

140 PRINT "X/Y =" ぉ A 

150 GOTU 120 

160 "errsub 

170 PRINT "XX% ケイ サン テ " キ マセ ン ※※ 


RESUME 1Z0 
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エラ ー の 原因 と な っ た 文 か ら 
プロ グラ ム の 実行 が 再開 され 
ます 。 ま た ,。 この と き エ ラー 
と な っ た 原因 を 取り 除 か な い 
と 再び エラ ー 処 理 ル ー チ ン へ ヘ へ 
戻り ます 。 

エラ ー の 原因 と な っ た 文 の す 
ぐ 次 の 文 か ら 実 行 が 再開 され 
まま 。 

行 番号 ? で 指定 し た 行か ら 実 
行 が 再開 され ます 。 


"Un 
X。Y7 100。10 

X/Y = 10 

A。Y? 3540 

区 ケイ サン チ " キマ セン ※※ 
A。Y?7 35,5 

X/Y = アァ 

XY? 

Break in 120 

0k 
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RIGHTS 














文字 関数 


文字 列 の 右側 か ら 指 定 さ れ た 長 さ の 文字 列 を 与え ます 。 


RIGHT$(< 文 字 列 >, < 数 式 >) 


B$ーRIGHTS(AS, 3) 


*・RIGHT$ は < 文字 列 > の 右側 か ら < 数 式 〉 で 指定 され た 長 さ の 
文字 列 を 取り 出す 関数 で す 。 

・ < 数 式 > は 0 一 255 の 範囲 に な けれ ば な り ま せん 。 

・< 数 式 > が , < 文字 列 〉 の 総 文字 数 以上 の 場合 は , < 文字 列 〉 全 
体 を , また , < 数 式 > が 0 な ら ヌ ルス トリ ング を 写 え ます 。 


LEFT$, (2)MID$ 


100 ′ も モラ" レツ (10) / ノ カイ テン 

110 INPUT ム A$ 

120 FOR 1=1 TO 11 

130 PRINT A$ 

140  。B ま =RIGHT$ も (A ま ,。 1 ) ' 
150  A$=B$ ま +MID ま CA ま , 1 ,LEN(A*)-1 ) 
160 NEXT 1 

170 END 


Fu 

? 9876543210 
2876543210 
0287654321 
1098765432 
2109876543 
3210987654 
4321098765 
5432109876 
6543210987 
7654321098 
8765432109 
2876543210 
Ok 
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数 値 関数 


乱数 を 与え ます 。 
RND(< 数 式 >) 
ARND(1) *5 


・0 以上 1 未満 の 乱数 を 与え ます 。 
発生 され る 乱数 は < 数 式 > の 値 に よっ て 次 の よう に 異な り ま 






数式 〉 が 負 の 場合 一 一 新しい 乱数 系列 を 設定 し ます 。 

(数 式 〉 が 0 の 場合 1 つ 前 に 発生 し た 乱数 の 値 を と 
り ま す 。 

< 数 式 > が 正 の 場合 一 一 次 の 乱数 を 発生 し ます 。 





100 “ーー ラン ス 9 サン テイ ーー 

110 DIM SUK6) 

120 FOR 1I=1 TO 100 

1 30 DA=INT(RND( 1 )※6+1 ) 
140 SU( DA )=SU( DA )+1 

150 NEXT 1} 

160 FOR 1=1 TO 6 

170 PRINT 【"-":SU(1) 5 を 
180 NEXT 1 


ュ っ 
_ コ 


1 1 1 | 1 1 
ト D し J 


XX いひ HI 大 Oh 選 ヒ 


) 
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RUN [INJIN| 一 般 コ マン ト 











1) メ モリ 上 に ある プロ グラ ム の 実行 を 開始 し ます 。 

2) フ ロッ ピ ィ ディ スク か ら フ ァイル を メモ リ に ロー ド し , そ 
の プロ グラ ム を 実行 し ます 。 

1) RUN< 行 番号 >」 

2) RUN< フ ァイル 名 >(R〕 | 
1 ) RUN 100 

2) RUN “2 : sample" 


1) < 行 番号 〉 を 指定 する と , その 行か ら 実 行 が は じ ま り ます 。 
指定 の な い 場 合 に は , 最も 若い 行 番号 の 行か ら 実 行 が は じ 
まり ます 。 プ ログ ラム の 実行 が 終る と BASIC は コマ ンド 
レベ ル に 戻り ます 。 

2) (Nso) DISK-BASIC で は 1) の 機能 に 加え て , メモ リ 上 に ブロ 
グラ ム が な い 場 合 も く フ ァイル 名 > で 指定 され る ブロ グラ ム 
を ロー ド し た 後 , 実行 する こと が で きま す 。 

。 RUN を 実行 する と , すべ て の 開い て いる ファ イル は 閉じ , 

目的 の プロ グラ ム を ロー ド す る 前 に メモ リ の 内 容 を クリ ア し 

ます 。 し か し ,R オプ ション を 付け た 場合 に は , すべ て の デー 

タフ ァイル は 開い た まま に な り ま す 。 

CT ooo 


Fun sample 
Fun 2: 七 = 七 』 ビ 
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SAVE [sl[N] 入出 力 コマ ンド 


oe) 
Gt 


内 | 「 了 


上 


E 


層 ) | 遇 


メモ リ 上 の BASIC プロ グ クラム を フロ ッ ピ ィ デ ィ ス ク に セー 
/ し ます 。 

SAVE< フ ァイル 名 >, [AJ 

SAVE “sample”, A 


*〈 フ ァイル 名 >〉 で 指定 され る ファ イル に プロ グラ ム を 書き 込 
み ま す 。 指定 し た ファ イル 名 と 同じ 名 前 の ファ イル が 存在 し 
た 場合 に は , 古い 内 容 は 失 な われ て , 新しい も の に 更新 され 
まま 

・A オ プシ ョ ン が 指定 され た 場合 に は 。 プロ グラ ム は アス 
キー 貸 式 で セー ブ プ さ れ ま す 。 オ プシ ョ ン の 指定 が な い 場 合 に 
は ,、 バイ ナリ 型式 に 圧 科 さ れ て プロ グラ ム の セー ブ が 行わ れ 
ます 。 ア スキ ー 型 式 の セー ブ は , バイ ナリ 型式 より も , 多く 
の ファ イル スペ ー ス を 必要 と し ます が , セー ブ さ れ た プロ グ 
フ ム フ ァ イル を 操作 する 場合 に は , アス キー 型式 で セー ブ さ 
れ て いな けれ ば な り ま せん 。 例え ば MERGE コマ ンド は . 
アス キー 筐 式 の ファ イル を 必要 と し ます 。 ま た , アス キー 型 
M で セー ブ プ さ れ た ファ イル は , デー タフ ァイル と し て 読み 出 
すこ こ が で きま す 。 


LOAD, MERGE 


Save 2sSpace.0dy " 
0k 
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SET |slIIN| 入出 力 ス テー トメ ント 


機 能 
書 。 式 


叶 
宮 


加 


ファ イル の 属性 を セッ ト あ る い は リセ ッ ト し ます 。 
1) SET< ド ライ ブ 番 号 >, < ぐ “属性 文字 ?> 

2) SET< フ ァイル 名 >, < ぐ で 属性 廊 字 ?: 

3) SET 半 < ファ イル 番号 >, < ぐ ぐ 属 性 文字 ” 

1) SET 1 "P" 

2) SET “2 : NOTWRITE",“P" 

3) SET キ 1“R" 


・ 指 定 し た ドラ イブ に 入っ て いる フロ ッ ピ ィ デ ヂ ディスク, ファ 
イル 番号 , ファ イル に , で ぐ 属 性 文字 > に よっ て 指定 され た 属 
性 を 付け ます 。 属 性 文字 は , 大 文字 の P, R で 指定 し , それ 
ぞ れ , ライ ト プ ロ テク ト ( 書 き 込 み 禁 止 ) リー ドア フタ ー ラ 
イト (書き 込み 確認 ) の 属性 を 付け ます 。 こ れ 以 外 の 文字 が 局 
性 文字 と し て 指定 され た 場合 に は , 現在 設定 され て いる 属性 
が すべ て 解除 され ます 。 

1) く ド ライ ブ 番 号 〉 が 指定 され た 場合 に は , 指定 され た ドラ イ 
ブ の 中 に 入っ て いる フロ ッ ピ ィ デ ィ ス ク に 対し て 属性 が つ 
けら れ ま す 。 

2) < ファ イル 名 > が 指定 され た 場合 に は , 指定 され た ファ イル 
の み に 属 性 が つけ られ , 同一 の フロ ッ ピ ィ デ ィ ス ク 中 の 他 
の ファ イル に は その 影響 は 及び ませ ん 。 

3) < ファ イル 番号 〉 が 指定 され た 場合 に は , 以後 その ファ イル 
へ の 出力 に 対し て 指定 され た 属性 が 作用 し ます 。 

・P 属性 を 付け る と , PRINT#, PUT, 等 の 書き 込み 動作 が 禁 

止 き れる と と も に , ファ イル の KILL, RENAME も で き な く な 

り ま す 。 

・R 属 性 を 付け る と , 書き 込み を 行っ た 直後 に 読み 出し を 
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行い 正しく 書き 込み が 行 れ た か の 確認 が され る よう に な り ま 
す 。 


参 ) ATTR$S 





ki11 "1:iaample*" 
F 1 1= uF1it= PCOt 上 ected 
Uk 
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SGN IN] 数 値 関数 


数 値 の 符号 を 与え ます 。 
SGN( < 数 式 > ) 
PRINT SGN(A) 





・ < 数式 > が 正 の 場合 1 を , 0 の 場合 は 0 を , 負 の 場合 は 一 1 
を 与え ます 。 





100 CMD SCREEN 2。,5:CMD CLS 3 
110 CMD LINE(0O。100)-(319,100),2 
120 人 X= コ 

130 FOR 1=O TO 31.42 STEP ,0S・ 

1 40 S=SGN( INT(COS( 1 )※20 ) ) 

150 UN S+2 GOSUB 200.,220.,240 
1 60 人 三 久 十 1 

170 NEXT 

180 ENDU 

190 “plus 

200 CMD PSET (X/2。20 ) ,3:RETURN 
210 "zero 

220 CMD LINE(X/2。20 )-(X/2,179) ,3:RETURN 
230 “minus 

240 CMD PSET (X/2。179).3:RETURN 
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SIN IN) 数 値 関数 


い 


正弦 (サイ ン ) の 値 を 与え ます 。 
SIN( < 数 式 > ) 
SIN( 3.14159/22 ) 


策 | | 洗 | | 噂 
議 | 【 較 ) ( 敵 


・ < 数式 > の 単位 を ラジ アン ( テ /180 メ X 角 度 ) と し た と き の 正 
弦 ( サ イン ) を 与え ます 。 
・ SIN 関数 の 演算 は 単 精度 で 行わ れ ま す 。 


100 “-- caec ラ モト メ 各 ーー 

110 PT=3,14159 

1 20 F 呈 = "Cgc( 糧 提 栖 ? ) 三 提 料 乾 。 電電 電電 

130 INPUT "カク ト * 』" sD 

140 R=D MOD 180 

1 っ 0 IF R=O0 THEN PRINT "テイ キネ" サレ マ セッ" :END 
160 じ =1/SIN(R/180xP1 ) 

170 PRINT _ USING F ま iD,C 


\ す 
H 4, 
ふい 
M\ 
ト で 


180 ENDH 
PtJT1 
カク ト ” 7 15 


CBc( 1 コ “") う = 3。86371 
Uk 

P TI 

カク ト " ss? 60 

csc( 60" う = 1,.15470 
0Uk 


2ー192 


SPACE$ 文字 関数 





指定 し た 長 さ の 空白 文字 列 を 与え ます 。 
SPACES( い 数 式 >) 
PRINT SPACES$(10) : “ABC” 








・ < 数式 > の 数 だ け の 空白 を も っ た 文字 列 を 与え ます 。 < 数式 〉 
の 範囲 は 0 255 ま で の 男 囲 に な けれ ば な り ま せん 。 


SPC 





100 “ーー らら qu ビ G こい じ ソ @ 一 一 

110 FOUR 1 エ =-6 『0U 6 

120 A ま =CHR も ( &H88 )+SPACE ま (ABS(TXT))+※ 
130 PRINT ム A ま $ 

140 NEXI 1 


150 END 

PtUjf1 

| 状 
! 和 

| 

I 共 

1 匠 

』】 

| ※ 

| 玩 

I 天 

【 基 

I 基 

| ※ 

! 
Uk 
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SPC 文字 関数 








指定 し た 数 だ け 空 白 を 出力 し ます 。 
SPC(< 数 式 >) 
PRINT SPC(10) : A$ 


・ SPC 関数 は PRINT や LPRINT な ど 出 力 文中 で の み 使 用 す 
ee の 72026 きき ます 。 
* < 数 式 > の 値 は 0 一 255 の 範囲 で す 。 


SPACE$、 TAB 


100 FOR 1I=0 TO 10 

110 PRINT “N80-BASIC" :SPC( 1 ) 』"N-BASIC" 
120 NEXT I 

130 END 


un 
N80-BASICN-BASIC 
N80-BASIC N-BASIC 
N80-BASIC N-BASIC 
N80-BASTC N-BASTC 
N80-BAS し N-BAS し 


N80-BASIC N-BASIC 
N80-BASIC N-BASTC 
N80-BASTC N-BASTC 
N80-BASTC N-BASTIC 
N80-BAS【C N-BASTC 
N80-BASTC N-BASIC 
Uk 
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SOR IN) 数 値 関数 


3 平方 根 ( ス クエ アル ー ト ) を 与え ます 。 


只 | | 基 
HL at 


SQR(< 数 式 >) 
文 例 ) A=SQR(2) 
解 説 ・< 数 式 > で 指定 され た 値 の 平方 根 を 写 え ます 。 
・ SQR 関数 の 演算 は 単 精度 で 行わ れ ま す 。 
2 100 "-- square root tab.le - 一 


110 PRINT "<< SQUARE ROOT TABLE >>` 
120 FOR N=0 TO 10 

130 PRINT "N ="jN,。 "ROOT(N) =「: 

140 PR INT USING "桂林 。 析 林間 栖 杜 5:SQR(N) 


150 NEXT N 

Fn 

<< SQUARE ROOT TABLE > ッ > 
N = U ROOT(N) = 0.00000 
N = 1 ROOT(N) = 1.00000 
N = 2 RUOT(N) = 1.41421 
N = ROOT(N) = 1.7320 っ 
N = 4 ROOT(N) = 2.00000 
N = っ ROOT(N) = 2,.23607 
N = 6 ROOT(N) = 2。.44?4 ラ 
N = ィ ROOT(N) = 2.6457 う 
N = 8 ROOT(N) = 2.82843 
N = ラ ROOT(N) = 3.00000 
N = 10 ROOT(N) = 3.16228 
Uk 
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STATUSPOINT グラ フィ ッ ク 関 数 





1 ) Last Referenced Point(LP) の 値 を 与え ます 。 

2) ビ ュー 座標 上 の 指定 され た 座標 に 表示 され て いる ピク セル 
の カラ ー ナ ン バ を 与え ます 。 

1) STATUSPOINT(< 機 能 >) 

2) STATUSPOINT(Hx。 Hy) 

例 ) 1) HX 王 STATUSPOINT(0) 

2) CL 三 STATUSPOINT (100, 100 ) 








1) 最後 に 高 解像度 グラ フィ ッ ク 操 作 の 行わ れ た 座標 (LP) を 
(機能 > の 指定 に より , ビュ ー 座 標 で 与え ます 。 
(機能 > は 0 と 1 の 整数 値 を と り STATUSPOINT の 返す 値 は 
次 の よう に な り ま す 。 


0 最後 に 高 解像度 グラ フィ ッ ク 操 作 の 行わ れ た 点 
の X 座標 (ビュ ー 座 標 系 ) を 返し ます 。 
1 ・ 同 じ く Y 座標 を 返し ます 。 


2) (Hx, Hy) に より 指定 され た ビュ ー 座 標 上 に 表示 され て いる 
ビク セル の 色 を カラ ー ナ ン バ で 返し ます 。 ま た 指定 され た 
座標 (Hx, Hyy) が ビュ ー ポ ボー ト 外 に ある 場合 は 一 1 を 返し ま 
に 夫 


サン プル いい 10 “ POINT function 
プログラム 20 CMD SCREEN 2 
30 CMD CLS 2 
40 CMD POUINT(10.20) 
50 IF STATUSPOINT(O)=10 THEN PRINT Good POINT function" 
60 IF STATUSPOINT(1)=20 THEN PRKINT Good _ POINT function" 
U CM PSET(100.110)。3 
80 【F STATUSPOINT(100 110)=3 THEN PRINT “Good POINT function" 
?U END 
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STATUSVIEW グラ フィ ッ ク 関 数 


STATUSVIEW( < 機能 > ) 
STATUSVIEW(1) 





す 。 


・ STATUS VIEW 関数 は , 面 画 上 の ビュ ー ボ ー ト の 位置 を 


返す 関数 で すか ら , 絶対 座標 系 の 値 で 返さ れ ま す 。 


CMD VIEW, 1 章 ビ ュー ボート 


10 " VIEU 和 †unction 

20 CMD VIEM(10,20 )-(30 40) 

30 IF STATUSVIEM(0O)=10 THEN PRINT 
40 IF STATUSVIEM( 1 )=20 THEN PRINT 
50 IF STATUSUVIEM(2)=30 THEN PRINT 
60 IF STATUSVIEM(3)=40 THEN PRINT 
70 END 
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現在 の ビュ ー ボ ー ト の 設定 位置 を 与え ます 。 


・ CMD VIEW に より 設定 され て いる 現在 の ビュ ー ボ ポート の 位置 
(Hxi,Hyi) 一 (Hxs,Hy。) を 返す 関数 で す 。 く 機能 > は 0 一 3 まで 
の 整数 値 を と り STATUSVIEW の 返す 値 は 次 の よう に な り ま 


・ ビ ュー ポー ト の 左右 の 頂点 の X 座標 (Hx ) 
・ ビ ュー ポー ト の 左右 の 頂点 の Y 座標 (Hy ) 
・ ビ ュー ボー ト の 右 下 の 頂点 の X 座標 (Hx) 
・ ビ ュー ボー ト の 右 下 の 頂点 の Y 座標 (Hy,) 


*Good VIEMU function 
*Good VIEMU func も tion 
*Good VIEMU function 
*Good VIEUMU function 


STR$ 
能 . 
書 。 式 
文 例 ) 








IN] 文字 関数 


数 値 を 表わす 文字 列 を 与え ます 。 
STRS に 数 式 >) 
A$ーSTRS(123 ) 


・ < 数式 > に よっ て 指定 され た 値 を 文字 に 変換 し ます 。 但し, 
数 値 お よび 変数 以外 を 指定 し て は いけ ませ ん 。< 数 式 > の 値 は 
帯 数 型 。 実 数 型 , ( 倍 精 度 , 単 精度 ) お よび ED を 伴っ た 指 
数 表現 な ど , すべ て の 数 値 型 に 有効 で す 。 

・ STR$ は VAL と 逆 の 変換 を 行い ます 。 


STRING$ こと STR$ を 混同 し な いよ うに し て くだ さい 。 
V AL 


100 “ 00zi00: 00 カラ シテ イシ タ し * ョ 9 スウ タダ" か 

110 “" か ケイ カシ タ シラ" コク ヲ も シ " レ ツ テー モト メル 

120 DEF FNS「 ま て 公 あ ) ニ =RIGHT*(「 0 '+RIGHT も (A ま 。LEN(A も ) 一 1 ) ,2) 
130 INPUT " 珍 ス 9 :"jSS 

140 日 =SS\3600 : M=( SS-Hx3600 )\60 

150 S=SS MOD 60 

160 昌和 ま =STR$ も (HH) : M も =STR ま ( M ) : S$=STR ま (S ) 

170 H ま = FNST ま (H あ も ) 1 M 呈 = FNST*(M も 2 5 S キ =F NS「 あ くら あう 
180 PRINT "00:0:O0 カラ 15Sj 吾 ケイ カシ ター | 

190 PRINT " ラ " コ ク ル 「 引 H も )! 51 も ・ 1 還 
200 END 

PT1 

スウ :? 10000 

00i0: 00 カラ 10000 珍 7 イカ シタ ミ " コ ク 02346:40 デス 


Uk 
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STRING$ IN| 文字 関数 





指定 し た 文字 を 指定 し た 数 だ け 与 えま す 。 
STRINGS$(〈 式 >。 ) 


・ 与 える 文字 は , < 文字 列 >〉 ま た は < 数 式 y? に よっ て 指定 し ます 。 


< 文字 列 〉 の 場合 最初 の 一 文字 が 有効 で す 。 < 数 式 > の 場合 は , 


値 が , 0 一 255 の 範囲 に 限ら ち れ , この 値 を キャ ラク タコ ー ド 


と みな し , 対応 する 文字 を 採用 し ます 。 


100 INPUT A$ 

110 L=LEN(A$) * 

120 PRINT STRING$(L+4 。 

130 PRINT "+ "「)SPCCLENCA う +1」 
140 PRINT "+ "iA も ) +" 

150 PRINT "+ ":SPC(LEN(A$)+1) 1 
160 PRINT STRING* ま (L+4」"+") 

170 END 


に い ロ 

ア STRTING ョ = モ 上 atemen 上 ample PFO9CP8am 

キ 二 二 二 二 十 キ 填 十 十 十 十 十 十 十 十 十 十 十 填 十 十 十 十 十 二 二 二 二 二 士 士 二 
」 十 
+ STRING ョ tatemen モ =ampPle PFOgFP8am + 
キ 十 
キキ 二 キ 二 二 二 キ 二 二 二 二 二 二 二 二 十 キ キ 二 十 十 士 二 二 二 士 十 士 二 士 圭二 
Uk 


2ー199 


STOP |NJIN| 一 般 ス テー トメ ント 








プロ グラ ム の 実行 を 停止 し て コマ ンド レベ ル に 戻り ます 。 
STOP 
STOP 


・ STOP は ブロ グラ ム の 実行 を 停止 する も の で , プロ グラ ム 
中 の どこ に 置い て も か まい ませ ん 。 
・ STOP を 実行 する と , 次 の メッ セー ジ が プリ ント され ます 。 
Break in XXXXX 

(XXXXX は スト ッ プ し た 行 番号 ) 
・ END と 異な り , STOP は ファ イル を クロ ー ズ し ませ ん 。 
・ STOP が 実行 され る と , BASIC は 常に コマ ンド レベ ル に 戻 
り ま す 。 ま た , CONT に より プロ グラ ム の 実行 が 再開 され ま 
す 。 
・ STOP は . ブロ グラ ム の 実行 中 [STOP| キー を 押す こと 
と 全く 同じ 動作 を し ます 。 た だ し キー を 押し て 実 
行 を 停止 し た 場合 は CONT に よっ て 実行 の 再開 が で き な い 
場合 が あり ます (“Cant continue" エ ラー)。 





CONT 


100 FOR 1=f0 「0 12 
110 PRKINT IT,SQKR(T) 
120 っ STOP 

130 NEXT 1 

140 END 


10 ば .16228 
Break in 120 
Uk 


こ O い ロキ 

1 1 3 。31663 
Break in 120 
Uk 
COn 七 

1 2 うさ 。464 1 
Bceask in 120 
Uk 
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SWAP 











IM INI 


一 毅 ス テー トメ ント 


2 つの 変数 の 値 を 交換 し ます 。 
SWAP< 変 数 名 や < 変数 名 2> 
SWAP A$, B$ 


・ と の 型 の 変数 (整数 , 単 精度 , 倍 精 度 , 文字 , 単純 変数 と 
配列 変数 に か か わら すず) でも, SWAP に より その 値 を 交換 す 
る こと が で きま す 。 し か し , その 2 つの 変数 の 型 が 一 致し て 
いな いと "Type mismatch" エラ ー が 起り ます 。 

・ < 変数 名 2 > が 単純 変数 (配列 変数 以外 の 変数 ) の と き , その 
変数 に は 値 が 定義 S8 れ て いな けれ ば な り ま せん 。 


ーーー 2 ツ ノ ハイ ルツ ノ ナイ ヨウ ラ イル カエ ル ーー 


DIM A(10),。B(10) 
FOR =1 TO 10 


(上 ) ニ I%2sB( エ )=I※3sGUSUB 200 


J NEXT TiLOCATE 0,.Y+3 


FURK I=1 TO 10 
SUAP (上)。B(T):GUSUB 200 


) NEXTF IiLUCATE 0,Y+2 


END 


"pF ビ in て ab 


=PUS( 0 ):Y=CSRL IN 


LOCATE XX,Y+1:PRINT _ USING 「 拉 柏 相 " 5B(1)』 


) LUCATE X+5。Y 


RETURN 


4 6 8 10 12 14 16 18 20 
6 ?2 12 15 18 21 24 2Z 30 
ら 6 
人 4 ら 6 


12 15 18 21 24 2Z 30 
8 10 12 14 16 18 20 
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TAB 文字 関数 





指定 され た 桁 位置 まで 空白 を 出力 し ます 。 
TAB (< 数 式 > ) 
PRINT TAB(10) : “N80-BASIC” 


・ TAB 関数 は PRINT や LPRINT な ど 出 力 文 中 の み で 使用 さ 
れ ま す 。 

・ < 数 式 > の 値 は 0 一 255 ま で の 範囲 で す 。 

・ < 数 式 > が 1 行 あ た り の 桁 数 より も 大 きく な っ た と き は 自動 
的 に 改行 され ます 。 


SPC し 


100 FOUR DUG=0 TO 180 STEP 20 


110 RD=DG/180 拉 3。 141 コ ウ 226 うつ 3 つ 8 ツィ ウッ 音 

1 20 PRINT "DEG = "iD6j 

13U PRINT TAB(15)"SIN(D6) =~:SINX(RD)} 

140 PRINT TAB(40) "COS(D6) ="jCOS(RD ) 

150 NEXT DUG 

Un 

UE6 = D SIN(DG) = 〔 CUS(UG) = 

UE5 = 20 SIN(DG) = 。34202 COS( UDG ) = .2396923 
UEG = 40 SIN(UG ) = 。642788 CUOS(DG) = 。766044 
DEG = 60 SIN(DG) = .866025 CUS(DG) = 。 う 5 

UEG = 80 SIN(UG ) = 。.?84808 COS(DG) = 。173648 
UEG = 100 SIN(DG) = 。,.?284808 CUS(DG) =ー-。173648 
UE5 = 120 SIN(UG) = 。.866025 CUS(DG ) =ー。 ら 5 

DEG = 140 SIN(DG) = 。642788 CUS( UDG ) =ー。766044 
DEG = 160 SIN(DG) = 。,.34202 COS( UDG ) =ー 32693 
DEG = 180 SIN(UG) = CUS( UDG ) ミー1 

UK 
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TAN N) 数 値 関数 











正 接 (タン ジェ ント ) を 与え ます 。 
TAN(< 数 式 > ) 
B 三 TAN(C/A ) 


・ < 数 式 > の 単位 を ラジ アン ( ァ /180X 角 度 ) と し た と き の 止 接 
(タン ジェ ント ) を 与え ます 。 
。 TAN 関数 の 演算 は 単 精度 で 行わ れ ま す 。 
TAN 関 数 は 
TAN (< 数 式 >) ニ SIN(< 数 式 >)/COS(< 数 式 >) 


と いう 式 で 算出 し て いる た め COS 関 数 の 値 が 0 と な る と き 。, 
(つま り < 数 式 > の 値 が . 7/2, 3z/2, 57/2 … の と き /) 


“Division by zero" エ ラー が 起こ り ま す 。 


100 “-- co 七 ヲ モト メル 一 一 

110 Pi=3.141 コ 9 

1200 上 も = "CO 七 (林間 社 ? ) 三 析 社 栖 。 栖 禁 栖 提 

130 INPUT " ヵ カ 2 クト" :「 5D 

140 R=D MOD 180 

150 IF R=O0 THEN PRINT "テイ キ *" サレ マセ ヤン":END 
160 C じ =1/TANCR/180※Pi) 

170 PRKINT USING F ま jjD, し 

180 END 


つ 
cot( 435" う = 1。00000 


カク ト * 4? 30 
co も ( 30")= 1.73205 


ガクト” 7 2 コ 
CO も ( 2Z3" ) う = 2。3 つ 86 
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策 | 論 | [ 障 | | 蘭 
幸 | | 軸 ) [ 員 憶 


NN| 特殊 コマ ン 


MKI を ター ミナ ルモード に し ます 。 


TERM< デ ー タ の ビッ ト 長 >,。 < パリ ティ >,。 < ボー レー ト >. 
< フィ ー ド スイ ッ チ > 


TERM J, 2, 1 1 

・ PC-8001MKIHI を BASIC モー ド か ら タ ー ミ ナル モー ド に 変 
化 さ せま す 。 

*・ グ ー ミ ナル モー ド で は , RS-232C と インターフェース を 介し 
て , 他 の コン ビュ ー タ や 周辺 機器 と の 通信 が 可能 と な り ま す 。 
* く デー タ の ビッ ト 長 〉>, 〈 パ リティ >〉, < ボー レー ト 〉, < フィ ー ド 
スイ ッ チ > は 次 の よう に な っ て いま す 。 


|「a ・8 ビ ピット モー ド 


〈 デ ー タ の ビッ ト 長 〉 に 記 
|] :7 ビ ピット モー ド 





: パリ ティ な し 
・ 谷 数 パリ ティ 
・ 偶 数 パリ ティ 
・ 双 64 
・ 六 16 


〈 バ パリ ティ > 


つつ k5 う 上 の 


・ オ ー ト L/F し な い 


・ オ ー ト L/F する 


(ボー レー ト フ ァ ク タ 
〈 く フィー ドス イッ チ > 


+F つ の 


*・〈 デ ー タ の ビッ ト 長 > は 8 ビッ トモ ー ド の 場合 最上 位 ビ ッ ト 
で カナ こと 英文 字 の 切替 え を 行い 。 7 ビッ トモ ー ド で は 
SI(Shift in), SO(shift ouD コー ド で 英文 字 と カナ 文字 の 切り 替え 
が 行わ れ ま す 。 

・〈< パ リティ > は パリ ティ の 形式 , 有無 を 指定 し ます 。 

* く < ボー レー ト フ ァ ク タ > と 。,。 本 体 後部 の ジャ ン パ スイ ッ チ に 
よっ て 実際 の ボー レー ト を 決定 し ます 。 ボ ー レ ー ト ファ クタ 
が X メ 16 の と き 後 部 ジャ ン パ スイ ッ チ の 値 が その まま 採用 され 


2 一 204 





ます 。※X64 の と き は ジャ ン パ スイ ッ チ の 値 の 4 分 の 1 が 実際 
05 レード ト の 60 ます 。 
・< フ ィ ー ド スイ ッ チ > の 指定 を 1 に する と CR コー ド を 受信 し 
た だ とき に CR (キャリ ジリ ター ン ) と LF( ラ イン フィ ー ド ) を 
行い 改行 し ます 。 0 の と き は CR,LF コー ド が それ ぞ れ 独立 
し て 側 き ます 。 
< ター ミナ ルモード で は ファ ンク ショ ン キ ー の 6 一 10 が 次 の 
よう な 意味 を 持っ て いま す 。 

・6 : コン トロ ー ル コー ド の 表示 を する / 表 示し な い 
・ キ ー ボ ー ド か ら の 入力 を 表示 する / し な い 
・LP に 出力 する / し な い 
・ 画 面 の 文字 を ブリ ンタ へ 出力 する 。 

・10 : LP の ライ ン フ ィ ー ド を 行う 。 
f・6-f・8 は 1 度 押す と 現在 の 逆 の 状態 に な り ま す 。 


( 〇 Q 〇 こさ の > 


・ タ ー ミ ナル モー ド に 入っ た 直後 は f・6-f・8 は 次 の よう に 
設定 され て いま す 。 


f・6 : コ ント ロー ルコ ー ド の 表示 を し な い 。 
f・7 : キ ー ボ ー ド か ら の 入力 を 表示 し な い 。 
f・8 : LP に 出力 し な い 。 


6 寺 |B| の 入力 で , ター ミナ ルモード か ら BASIC 


に 戻り ます 。 
PC-8001MKI ユー ザー ズ マ ニュ アル 


も eFm 」 ょ 2。1。1 
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TIMES 








予約 変 


内 蔵 の カレ ンダ 時 計 の 時 刻 を 与え ます 。 
1) TIMES$ 

2) TIMES=ー“HH : MM : SS” 

PRINT TIME$ 


・ TIME$ は 予約 変数 で あり 現在 の 時 刻 を 持っ て いま す 。 
・ TIME$ の 形式 は . 
HH : MM : SS 


で 示さ れ ま す 。 
・ TIME$ は 次 の よう に 新た に 時 刻 を 設定 する こと も で きま 


す 。 


HH は 00-23 ま で , MM は 00 一 59 ま で , SS は 00 一 59 ま 


で の 数 で す 。 


TIME$ デ "12 : 30 : 00" 


DATE$ 


100 


110 
120 
130 
140 
1 っ 0 
160 
170 
180 
190 
200 
e10 
2ZU 
230 
の 41 
2 っ 0 
60 
2Z70 
Z80 


PIT 


リー ン サ ザイ ノ 


シテ イ シ " カ ンコ " / シシ" コク ヲ モト メル 
T も =T IME$ も 
PRINT カンサイ ノミ ドコ ゴク 「「" 
INPUT "カン (0-23):』 "5H 
INPUT "フン (0-59):「 5M 
INPUT " ヒ *" ョ ウ (0-59):" s5 
HH=VAL(LEFT ま (も 。2 ) ) 
MM=VAL(MID ま ( ま ,4 。2) ) 
SS=VAL(RIGHT ま (も 。2) ) 
っ らら ニ らら +S : MM= ニ MM+M : 日 HHH+H 
FOR 1I=0D TO 1 
MM=MM+SS\60 : SS=SS MOD 60 
HH=HH+MM\60 : MM=MM MOD 60 
DD=DD+HH\24 :HH=HH MOD 24 
NEXT 1 
PRINT “も モト メル ミコ ゴク A" 
IF DD=1 THEN PRINT "ヨク ミド ツー ソノ " ェ 
PRINT USINO  " 析 柏 請 提 相 令 料 称 テテ デス" HH。MM。SS 
END 


> コク A 20k:15:54 テ “ ス 


> ッ "カン (0-23):? 1 


ノン 


(0-59)i:? 23 


ビ " ョ ウ (0-59)k? 45 
モト メル シ " コ ゴク ハ 
21 時 32 今 32 生 テ " ス 


Uk 
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TRON/TROFF 他 [N] 一 般 コ マン ド 








プロ グラ ム の 実行 状態 を 追跡 し ます 。 
TRON 
TROFF 
TRON 
TROFF 


曲 





。TRON は プロ グラ ム の 誤り を 見 つけ る と き な ど に 実行 


し ま : の 5 
。TRON を 実行 する と (ダイ レク トモ ー ド で も フロ グラ ム 
モー ド で も 実行 で きま す ) 実 行 し た 行 番号 を 表示 し ます 。 そ 
れ ぞ れ の 行 番号 は 角 カ ッ コ ([ |) に 囲ま れ て 表示 され ます 。 
行 番号 の 表示 は TROFF (また は NEW ) を 実行 する と 促 止 さ 
れ ま す 。 


10 FOR IT=1 『O 3 
ZU PRINT 1 
30 NEX[I 1 


もじ On 

Uk 

に い 員 
L10」JL20」 1 
L30JL20』 2 
[301L20」 3 
L 30 』 

U に 

モ じ O† 征 

0 に 


に いり ロ 
の 


っ 
Uk 
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USR N| 特殊 関数 


機械 語 で 作ら れ た 関数 ルー チン を 呼び 出し ます 。 
USR〔< 番 号 >〕(< 引 き 数 > ) 
I ニ USR3(0 ) 





・ USR 関数 は , ユー ザ の 作成 し た 機械 語 関数 ルー チン を 呼 
び 出 し ます 。USR 関数 は , 呼び 出さ れる 前 に DEF USR で 実 
行 開始 番地 が 設定 され て お り , メモ リ 上 に 準備 され て いな け 
れ ば な り ま せん 。 

・〈 番 号 〉 は 0 一 9 まで の 値 で , DEF USR に より 定義 され た 
番号 に 対応 し ます 。 < 番号 〉 が 省略 され た 場合 は 0 と 見 な され 
ます 。 

・9| き 数 > は 数 値 式 ある い は 文字 式 で 。 そ の 引き 数 の 型 は A 
レジ スタ に 渡さ れ ま す 。 詳 しく は , 付録 B 機 械 語 プ ログ ラム 
の 作り 方 を 参照 し て くだ さい 。 





Nso-BASIC, No DISK-BASIC に お いて 6000H か ら 7FFFH 番地 
に 書か れ た 機械 語 プ ログ ラム を USR 関数 で 呼び その 値 を , 
直接 CMD, STATUS の つい た 文 の 引き 数 と し て 使う こと は で 


し て くだ さい 。 


DEF_ USR 付録 B 機械 語 プ ログ ラム の 使い 方 





100 CLEAR 300,&HDFFF 
110 UEF USRO=&HE000 
120 DEF USR1=&HE010 
130 POKE &HE000 。&HC9 
140 POKE &HE010.。&HC9 
10 A=USRO( 1 23 ) 

ょ 60 PRINT A 

170 _ PRINT USR1(456 ) 
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VAL 


NN) 文字 関数 


文字 列 の 表す 数 値 を 与え ます 。 
VAL ベ 文字 列 ?) 
AVAL(“2?) 


・ < 文字 列 > を 数 値 に 変換 し て 返し ます 。 

・ < 文字 列 〉 の 最初 の 文字 が 十 , 一 , 選 ,., また は 数 字 で な け 
れ ば VAL の 値 は 0 に な り ま す 。 ま た , 数 字 以 外 の 文字 (た だ 
し , 16 進 数 の 場合 の A-F, &H の H, お よび 指数 表現 の D と 
E を 除く 。) が 人 各 ま れ て いる 場合 ,. それ 以降 の 文字 は 無視 され 
ます 。 

・ 文 字 列 中 の スペ ー ス は 無視 し ます 。 


STK$ 


100 00k0OO:O00 カラ が リン サド イ マテ " ノ 

110 “" ヒ " ョ ウス 9 ラ モト メル 

12U0 「 呈 =[ ME まま 

130 H=VAL(LEFT ま (「 和 まま,2) ) 

140 M=VAL(MID ま (4,2)) 

150 S=VAL(RIGHT ま (「 事 2) ) 

160 SS=H※3600+NMX60+ ら 

170 PRINT "00:00:00 カラ iT まあ) マテ "AA 5 
180 PRINT SSji" 妥 カ ン テ " ス " 

120 END 

PT1 

00:00s00 カラ 10:12:02 マテ " 八 3672Z22 矯 カ カンテ" ス 
Uk 
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VARPTR IN] 特殊 関数 


妥 数 の 格納 され て いる メモ リ 番 地 。 ファ イル に 割り 当て られ 
て いる バッ ファ の 先頭 番地 を 与え ます 。 


1 ) VARPTR(< 変 数 名 >) 
2) VARPTR( 半 < ファ イル 番号 > ) 
1 ) PRINT HEX$(VARPTR( A) ) 
2) BAーVARPTR( 1) 


に 計 | | 員 | 癌 
に 加 L| | 避 


1) < 変数 名 〉 で 指定 し た 変 角 の デー タ が 格納 され て いる 変数 領 
域 の メモ リ 番 地 を 与え ます 。 こ の と き 指 定 さ れる 変数 は 値 
が 代入 され て いな けれ ば な り ま せん 。 


変数 テー ブル VARPTR の 値 で 示さ れる 


ュー ドド 人 07 ド レス 上 (7 アド ト レス 。 









邊 数 型 L2 | 全数 名 影 2 ケ 
2 ベイト 2 バイ ト ( 下 位 。 上 位 の 順 ) 
清 度 型 |4| 変数 名 の ン | | 
精度 型 
2 バイ ト 8 バイ ト 
文字 型 





TimemehiaceeeePEeeershsam 
2 バイ ト 3 バイ ト 
の ハス クル ウ ラク 


文字 列 格納 ア ドレ ス 
文字 列 の 長 さ 


2) 指定 し た く フ ァイル 番号 > に 割り 当て られ て いる 入出 力 バ ッ 
ファ の 先頭 番地 一 9 を 与え ます 。 


付録 B 機 械 語 プ ログ ラム の 作り 方 (VARPTR) 
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100 “-- (]ocal value) \ 2 ヲ も トメ 上 ルル 一 一 
110 DEFINT A 

120 INPUT "Value'jA 

130 AD=VARPTR(A) 

140 AL=(A/2) MOD 256 

150 AH=(A\ ギ 2 )\256 

160 POKE AD,aL 

170 POKE AD+1 ,AH 

180 PRINT み A 

190 GOTO 120 


じい ロ 

Value? 1245 
622 

Value? 653 
326 

Value? 2035 
451/ 

Va 1 ue? 

Break in 120 

Uk 
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WAIT 人 同 [N] 特殊 ステ ー ト メン ト 








入力 ボー ト を モニ タ し ,。 その間 プロ グラ ム の 実行 を 中 断 し ま 
す 。 
WAIT<I/O ア ド レス >,< 式 化 (, く < 式 2>〕 


WAIT 1 &H22. &H22 


・ WAIT は 指定 し た 入力 ボート の ビッ ト パ タ ー ン が 指定 し 
た 状態 に な る まで ブロ グラ ム の 実行 が 中 断 さ れ ま す 。 
・ 指定 し た ポー ト か ら 読 み 込ん だ デー タ と < 式 2 > と の XOR 
の 結果 と < 式 1> と の AND が 取ら れ , その 結果 が 真 ( 0 以外 ) 
に な る まで ホ ボー ト の デー タ を 読み 続け ます 。XOR と AND の 
結果 を A と し て 式 で 表 わ せ ば 次 の よう に な り ま す 。 


A =ー(( 読 み 込 ん だ デー タ ) XOR < べ 式 2 > ) AND < 式 1〉 


この 結末 (この 場合 A ) が 0 ( 偽 ) で あれ ば BASIC は も う 一 
度 ボ ポー ト の デー タ を 読み 込み 同じ 操作 を 繰り 返し ます 。 も し 
結末 が 0 で な けれ ば ( 真 ), プロ グラ ム の 実行 は 次 の 文 に 移り 
あの 
・< 式 2> が 省略 され た 場合 は 0 と 見 な し ます 。 

WAIT は 式 の 指定 を 誤る と 無限 ルー プ に 入っ て し まい ます 。 
この 場合 MKI を リセ ッ ト し な けれ ば な り ま せん 。 

100 “-- ea Trom key Por も ーー 
2 


1 30 “= 上 ar ロモ 

140 END 

に い ロ 

Type "= セ モ o 5 セ ta 
Uk 


ご 
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画面 制御 ステ ー ト メン ト 


テキ スト 画面 に 表示 する 文字 の 行 数 と 桁 数 を 指定 し ます 。 
WIDTH〔< 桁 数 >][, < 行 数 >」 
WIDTH 80, 25 





・ テ キス ト 画 面 に 表示 する 1 画面 あたり の 行 数 と 1 行 あ た り 
の 桁 数 を 指定 し ます 。 
・ < 桁 数 〉 は 80, 72,40.36 の いずれ か で 指定 し ます 。 た だ し テ 
キス ト 画 面 が カラ ー モ ー ド の 状態 に ある と き は 1 行 あ た り 
表示 する 桁 数 は < 桁 数 > 一 1 と な り ま す 。 ま た , 〈 桁 数 〉 が 省略 
され た 場合 , 現在 の < 桁 数 〉 が 採用 され ます 。 
・〈 桁 数 〉 は 20 か 25 の どちら か を 指定 し ます 。 省 略 さ れ た 場合 
現在 の < 桁 数 〉 が 採用 され ます 。 

・ 低 解像度 グラ フィ ッ ク の 解像度 は WIDTH に よっ て 決定 さ 
ba 

解像度 

横 <〈 衝 数 >X 2 ビ ピク セル 
行 数 > X 4 ビク セル 











た だ し , 低 解 像 度 グ ラフ ィ ッ ク 命 令 を 使用 する と き は , 通 
常 〈 行 数 > は 25 を 指定 し ます 。20 を 指定 する と ビク セル と ピク 
セル の 間 に す きま が で きま す 。 





ぃ 1dth 80。2 う 
ぃ 1d モ h 。20 
uidh モ 40,20 
ui 上 h 72。2 コ 
uidth 36。2Z0 
ゅ 1dth 80 
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A. デー タフ ァイル の 作り 方 


デー タフ ァイル に は シー ケン シャ ルフ ァイル と ラン ダム ファ イル の 2 
種類 が あり ます 。 こ こ で は 入出 力 の 対象 と し て フロ ッ ピ ィ デ ヂ ディスク を 例 に 
と っ て , デー タフ ァイル の 作り 方 を 説明 し ます 。 


A.1 シー ケン シャ ルフ ァイル 
シー ケン シャ ルフ ァイル は ,。 ラン ダム ファ イル より も 簡単 に 作る こと が 
で きま す が , デー タ を アク セス する 時 に , 融通 性 と スピ ー ド の 点 で ラン ダ 
ム フ ァ イル より 制限 を 受け ます 。 こ れ は , シー ケン シャ ルフ ァイル が デー 
クタ を 順番 に 記録 し , 読み 出す 時 も 最初 か ら 順番 に 読ま な けれ ば な ら な いか 
ら で す 。 
シー ケン シャ ルフ ァイル を アク セス する 際 に 使用 きれ る ステ ー ト メン ト 
と 関数 を 以下 に 示し ます 。 
OPEN, CLOSE, INPUT せ , LINE INPUT せ , PRINT 土 , 
PRINT せ USING, EOF, LOF, LOC, INPUT$(X, [ 半 ]Y) 
シー ケン シャ ルフ ァイル を 作り , その 中 の デー タ を アク セス する た め に 
必要 な 手順 は 次 の よう に な り ま す 。 


A.1.1 シー ケン シャ ルフ ァイル の 作成 
1) OUTPUT モ ー ド で ファ イル を オー フン し ます 。 
OPEN “TEST” FOR OUTPUT AS キ 1 

2) PRINT 半 を 使っ て ファ イル に デー タ を 書き 込み ます 。 

PRINT キ 1 NS j:“」 7 ュ P 





3) 必 要 な だ け 2) の 作業 を 繰り 返し た 後 , ファ イル を クロ ー ズ し て 終了 し 
ます 。 





、 っ Sample ) CLOSE 半 1 
例 と し て , キー ボード か ら 生 徒 の テス ト の 点数 を 入力 し て , シー ケン シャ 
ルフ ァイル "TEST" を 作る プロ グラ ム A 一 1 と 実行 例 を 示し ます 。 


付 -1 


10 “ ム A-1 
20 OPEN "TEST" FOR OUTPUT AS #1 


40 INPUT “ナマ エ ”sN$ 

っ 50 IF N も = "end" THEN 120 

60 INPUT "カモ ク " siK ま 

70 INPUT "トク テン " sP 

80 PRINT 持 1 。N ま も?) 。 "5K ま も ょ ) "5P 
U PRINT 

100 GOTO 30 

110 


120 CLOSE #1:END 


PHTT 

ナマ エア リタ ナ へ “モリ マサ 
カモ ク ? ニー コ クコ“ 

トク テン ? 81 


ナマ T? コマ リ ラ ケ * キ 
カモ ク ? コク コ " 
トク テン ? 49 
ナマ エ ? サマ タ カツ " ミ 
カモ ク ? コク コ * 
トク テン ? 100 


ナマ エア end 
Uk 





ンー ケン シャ ルフ ァイル を 作成 する プロ グラ ム に お いて , PRINT 半 US. 
ING を 使用 する こと に よっ て , 書式 制御 し た デー タ を 書き 込む こと も で き 
ます 。 例 えば, 
PRINT#1. USING “半井 半井 . 装 半 " AB C,D 

を 使う と , 特に 区 切り 記号 を 付け る こと な く , ディ スク に 数 値 デ ー タ を 書 
き 込 むこ と が で きま す 。 こ の 区 切り 記号 と は ,、 シー ケン シャ ルフ ァイル の 
中 の デー タ の 読み 込み に INPUT 半 を 使用 する と き , 数 値 デ ー タ の 場合 は コ 
ンマ , キ ャ リッ ジリ ター ン , ラ イン フィ ー ド 。, 空白 な ど を 区 切り と し て デー 
ク を 読み 込む た め の も の で す 。 LINE INPUT 半 を 使用 する 場合 は 。 キ ャ リッ 
ジリ ター ン の み を 区 切り 記号 と し ます 。 

LOC 関数 を シー ケン シャ ルフ ァイル に つい て 使用 する 場合 は . その ファ 
イィ ル が 開か れ て 以降 .。 アク セス され た 総 セ クタ 数 を 値 と し ます 。 


A.1.2 シー ケン シャ ルフ ァイル か ら の 読み 込み 
(NNUT モー ド で ディ ナル を オー プッ し ます 。 
Sample ) OPEN “TEST" FOR INPUT AS キ 1 
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2) INPUT 斗 , LINE INPUT 半 等 を 使っ て ファ イル か ら デ ー タ を 読み 込み 
ます 。 
INPUT 半 , N$, P 
3) 必要 な だ け 2) の 作業 を 繰り 返し た 後 , ファ イル を クロ ー ズ し て 終了 
し ます 。 
CLOSE 半 1 
次 に プロ グラ ム A 一 2 と し て 。 プ ログラム A 一 1 で 作っ た ファ イル 
“TEST" を アク セス し , 50 点 未満 の 生徒 を 全部 表示 する 例 を 示し ます 。 
0 hm "TEST ” FOR INPUT AS 昔 1 
市 le 1 。 Nb,K ま も,P 


S50 IF P>=5S0 THEN 30 
60_ PRINT _N も ,K 和 も 」 ビ 


70 GOTO 30 

に じい 

コマ ツ シル か “ キ コク ] コ “ 19 
Input pa ら t end in 40 

UDk 


プロ グラ ム A 一 2 で は ファ イル 中 の デー タ を 最初 か ら 順 番 に 読み 込ん で 
いき ます 。 そ し て , ファ イル の 最後 で も う 読 み 込む ゲー タ が な く な る て と, 
40 行 で “Tnput past endd'" エラ ー が 起こ り ま す 。 こ れ を 訂 け る だ た だ ため に は , 35 
行 に 

35 IF EOF(1) THEN 100 
を 挿入 し て ファ イル の 終り を チェ ッ ク し 


100 CLUSE #1 
110 END 


の よう に 処理 し ます 。 


A.1.3 シー ケン シャ ルフ ァイル へ の デー タ の 人 加 
フロ ッ ピ ィ デ ィ ス ク 上 に シー ケン シャ ルフ ァイル が 既に 作ら れ て いて 。, 
その 後 の デ ー タ を 追加 し た い 場 合 に は , 次 の よう な 手順 で 行い ます 。 
1) APPEND モー ド で ファ イル を オー ブン し ます 。 
OPEN “TEST" FOR APPEND AS 半 1 
2) PRINT 壮 を 使っ て ファ イル に 追加 し た い デ ー タ を 書き 込み ます 。 
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Sample ) PRINT 半 1N$:" "・P 
3) 必要 な だ け 2) の 作業 を 繰り 返し た 後 , ファ イル を クロ ー ズ し て 終了 


し ます 。 


CLOSE 闘 1 
例 と し て , ブロ グラ ム A 一 1 で 作っ た ファ イル “TEST" に デー タ を 追加 
する 例 を ブログ ラム A 一 3 と し て 示し ます 。 


10 “A-3 
20 OPEN "TEST" FOR APPEND AS #1 





40 INPUT "ナマ T' 5N$ 

50 IF N$='end" THEN 120 

60 INPUT "カモ ク " :K ま ま 

70 INPUT "トク テ ン 「jP 

GU PRINT##1 。N も 』 |) 。) 5K ま :" 。" :P 
90 PRINT 

100 GOUTO 30 

110 “ 

120 CLOSE 拉 1:END 


"un 

ナマ エア ニー イリ モト ヨウ イチ 

カモ ク ? ニコ クコ “ 

トク テン ? 30 

ナマ エア サク マ オサム 

カモ ク 7 ココ クコ“ 

トク テン ? 95 

ナマ エ ? カケ "ヤマ ケン シラ" 

カモ ク ? ニコ クコ “ 

トク テン ? 50 

ナマ マエ? end 

り k 

この ブロ グラ ム は プロ グラ ム A 一 1 の 20 行 を APPEND モー ド に 替え た だ 

け で す 。 従っ て 。 この プロ グラ ム で デー タ を 追加 し た ファ イル に 対し て プ 
ログ ラム A 一 2 を 実行 し て チェ ッ ク す る こと が で きま す 。 

run ムー-2" 

コマ ツ ラ ケ ” キ クコ“ 4 ツ 


イリ モト ヨリ イチ ココ 3U 
Uk 


A.1.4 シー ケン シャ ルフ ァイル の デー タ の 修正 
ンー ケン シャ ルフ ァイル で は その ファ イル の デー タ を 修正 する こと が で 

きま せん 。 従っ て , 現在 の ファ イル か ら 読 み 込 ん で 修正 し た デー タ を 新 し 

い 別 の シー ケン シャ ルフ ァイル へ 書き 込ん で いく 作業 を 行なわ な けれ ば な 
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り ま せん 。 以下 に プロ グラ ム A 一 4 と し て ,。 ブフ ログラム A 一 1 や A 一 3' で 
作っ た ファ イル の 修正 を 行う 例 を 示し ます 。 


- 合 ー-4 
DPEN "TEST" FOR INPUT AS 1 
) OPEN “test" FOR OUTPUT AS 幕 Z 


IF EOF(1 ) THEN 500 
INPUT #1,N$,K$ も ,P 
IF FLG=1 THEN 300 
| PRINT N$,K$*,P 


PRINT "ヘン コウ カ " アリ マス カ ア 「 5 

INPUT "(y or n or d or e) 5^A$ 
J 2 

IF AA ま ="= THEN FLG=1:GUTO 300 
IF A も ="d THEN 40 

IF A$ も ="n THEN PRINT :GUTO 300 
IF A ま <>" ッ y THEN 100 

| INPUT "ナマ エ "5jN$ 

INPUT "カモ ク "jsK ま $ 

INPUT "トク テン "sjP 

| PRINT 


PRINT 拉 2。N も 3)。 3K ま 5 。 
GOTO 40 


550 


CLOSE 1 
じ CLOSE 昔 2 


NAME "test'" AS "TEST~ 
END 


上 の プロ グラ ム で は , ファ イル “TEST" か ら 読 み 込ん を だ デー タ に 修正 が 
合 は その まま 新しい ファ イル “test" へ 書き 込み ます 。 も し 修 止 が あ 
る 場合 は , 170 一 190 行 で 新しい デー タ を 入力 し , “test" へ 書き 込み ます 。 
削除 する 場合 に ( 
す 。 修正 が 終了 し た 場合 に 
ま “test” へ 書き 込む 作業 を “TEST" の ファ イル エン ド ま で 繰り 返 

最後 に , 古い ファ イル “TEST" を 消去 し , 
し て 終了 し ます 。 


な い 場 


は 書き 込ま ず に 次 の デー タ を “TEST”" から 読み 込み ま 
は , “TEST" か ら 読 み 込ん を だ デー タ を その ま 
ス し ます 。 





test を “TEST" に 名 前 4 


A.2 ラン ダム ファ イル 

ラン ダム ファ イル を 作る に は , シー ケン シャ ルフ ァイル の 場 
の 手順 が 必要 と な り ま す 。 

し か し , ラン ダム ファ イル で は 数 値 を 内 部 表現 に 変換 し て 記録 する た め 
ファ イル の 占め る 領域 を 小さ くす る こと が で きま す 。 ま た , レコ ー ド 単位 


合 よ り 多 く 
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で 任意 の デー タ の アク セス が で きる た め , シー ケン シャ ルフ ァイル の 場合 
の よう に 空 読み する 必要 が あり ませ ん 。 さ ら に , デー タ の 修正 を 自由 に 行 
える と いう 利点 も あり ます 。 
ラン ダム ファ イル を 作っ た り ア クセ ス し た りす る に は 次 の 手順 が 必要 と 
りり ます 。 
| サッ ダム プ ァ ィ イル を オー フン し ます 。 
OPEN "TESTR' AS 半 1 
2) ラン ダム バッ ファ に 文字 変数 を 割り 当て ます 。 
FIELD 半 1, 20 AS K$, 2AS P$ 
3) デー タ の 書き 込み , 読み 込み を 行い ます 。 


PUT キ #1 NM% 
GET せ 1. NM% 
だ だ し 。 デー タ を 書き 込む 前 に 。 バッ ファ へ ヘ デー タク を 転送 し て お 
ょ けれ ば な り ま せん 。 デ ー タ が 文字 列 の 場合 は LSET, RSET を 使 
いま す 。 


LSET N$ 王 A$ 
また , 数 値 で ある 場合 に は 一 旦 MKI$, MKS$, MKD$ を 使っ て , そ 
れ ぞ れ 整 数 値 , 単 精度 実数 値 , 倍 精 度 実数 値 を 2 バイト , 4 バイ ト , 
8 バイ ト の 文字 に 変換 し て か ら バ ッ フ ァ へ 転送 し ます 。 
(Sample ) LSET P$ 王 MKI$ (P) 
ま た, GET 韻 に よっ て 読み 込ん だ デー タ が 数 値 で ある 場合 に は , 
CVI CVS, CVD を 使っ て 文字 列 か ら 数 値 へ 変換 し ます 。 
PCVI (P$) 
4) ラン ダム ファ イル を クロ ー ズ し て 作業 を 終了 し ます 。 
CLOSE キ 1 
次 に , ブロ グラ ム A 一 5 と し て , ブログ ラム A 一 1 一 A 一 4 を 生徒 番号 
に よっ て ラン ダム アク セス を 行う ラン ダム ファ イル に し た 場合 の 例 を 示し 
の 6 
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100 “A-5 

110 INPUT "file name 3F ま 

120 UPEN F 呈 AS #1 

130 FIELD #1.1 AS ID ま 。20 AS N$ も ,20 AS K ま ま ,2 AS F ま ま 
1 40 メニ ュー 

150 CMD CLS 1 

160 PRINT " 1: テ "ー タ サク セイ ヘン コウ ” 

170 PRINT '" 。 2: テ "ー タ サン ショ ウ “ 

180 PRINT " 3: テン スウ ニ - ヨル ケンサク" 

1920 PRINT " 4: シュウ リョウ ” 

200 PRINT "999: フ ァイル ノ イニ シャ ライ ス " 

210 INPUT " エラ ン テ " クタ "サイ 3F 

クノ 20 IF F=999 THEN 50 

230 ON GO0TO 280 250 , 580 , 86U 

240 GOTU 140 

ノ っ U テ ”ー タ サン ショ リ 

260 SF=ー-1 

270 GUTOU 380 

280 " テ "ー タ ヘン ] コ 9 

290 SF=O 

300 

310 GET 拉 1。1 

320 MAX=CVT(P ま ) 

330 PRINT "セイ ト "ソン ゴウ 9 (1 一" USING  " 拉 壮 村 "5MAX-1 5 
340 INPUT ' マタ ルル 0i オ リリ) NM 

350 IF NM%=0 THEN 140 

360 NM=NM タ +1 

370U GET 1 NM 

380 IF ID も =CHR ま (255 ) AND SF=0 THEN 470 
う ワ U IF ID ま =CHR も ( 255) AND SF THEN 300 
400  P 和 =CVUI(P ま ) 

410 PRINTI 

420 PRINT "ナマ エ : "5jN ま 

430 PRINT "カモ ク : "5?jK ま ま 

440 PRINT "トク テン : 5jP 

450D PRINT 

460 IF SF THEN 300 

470 ッ ツ キン 

480 INPUT “ナマ エ 1?A ま 

上 190 IF A も <>” THEN LSET N も =A ま も 

SO00D INPUT "カモ ク 5? ム まま 

510 IF A ま <>"" THEN LSET K も =A$ 

520 INPUT "トク テン "5』A$ 

っ 3U {IF A ま <>" | THEN LSET P ま =MKT ま (VAL(A 呈 ) ) 
540 PRINT | 

5S50 LSET. ID も =“U" 

560 PUI 拉 1 NM を 

57U GUTOU 280 

っ 80 ケンサク 

590 GETI 昔 1,1 

600 MAX=CUVI(P$) 

610 INPUT "ナン テン イカ テ " サン サク シマ スカ iAK 
620 PRINT 

630 FOR _NM%=2 TO MAX 

640 GE | 昔 1。NM を 

650 IF ID も =CHR ま ( 255 ) THEN 690 

660 IF CVI(P$)>AK THEN 620 

670 PRINT _ USING  " 料 拉 寺 3NM シ を ー1 3 

680 PRINT N ま も:K ま :USING ” 林間 析 枯 " ょ CV1(P ま ) 
690 NEXI NM 

7U0 PRINT 

KS PR INT "ケン サク シュ ウリ ョ ウ 。 RETURN ヲ オシ テ クタ "サイ 。「 
720 

730  A ま =INKEY ま : IF A ま =" | THEN 720 

40 GUTU 140 

750 ” イニ シャ ライ ス " 
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760 
/0 
780 
0 
8U0 
810 
dZ0 
830 
840 


INPUT セイ ト 八 " フ コ "ウー ノ サイ タダ "イチ "iMAX 
INPUT "ファ イル ヲ イニ シャ ライ ス " シマ スカ (y マタ ハル n) 
IF A ま <>"y” THEN 140 
FOUR NM=1 TU MAX+1 
LSET TUD 和 ま =CHR ま ( 255 ) 
PUT 1.NM シ を 
NEXT_ NM 
LSET P ま =MKT ま (MAX+1 ) 
PUT 拉 1.1 


-* 公 ま 


8 っ 0 5OUTO 140 


8e0 ・ 


87U0 


シュ リリ ョ リ 
じ LUSE 昔 1 


880 END 


B. 機械 語 プ ログ ラム の 作り 方 


Nao-BASIC に は , 機械 語 で 書か れ た プロ グラ ム を 呼び 出す 機能 と し て .、 
USR 関数 が 用 意 さ れ て いま す 。 こ こ で は 機械 語 プ ログ ラム を 作成 する 医 
の 注意 と USR 関数 と の 引き 数 の 受け 渡し 方 に つい て 説明 し ます 。 な お 、 
ここ で の 説明 を 正しく 理解 する た め に は PD-780C-.1 の プロ グラ ミン グ 
に 関す る 知識 を 必要 と し ます 。 





B.1 メモ リ の 配置 

成 杉 語 ルー チン を モニ タ に より 作成 し た り , ファ イル か ら ロ ー ド する 際 
に は , その た め の メ モリ 領域 を 確保 する 必要 が あり ます 。 こ の 機械 語 プ ロ 
グ クラム 用 の メモ リ 領 域 は BASIC の 使用 する 領域 と 重複 し て は な り ま せん 。 
さも な いと , BASIC の 動作 が 異常 に な っ た り , 逆 に BASIC の 動作 に より 
準備 し た 機械 語 プ ログ ラム が 破壊 され た り し ます 。 メ モリ の 確保 は 
CLEAR 文 に より BASIC の 使用 する メモ リ の 上 限 を 設定 する こと に より 行 
いま す 。 指定 され た 上 限 以 上 の 領域 は BASIC は 利用 し な く な り ま す の で 
了 械 語 フ ログ ラム 領域 と し て 用 いる こと が で きま す (CLEAR 文 参 照 ) 。 








機械 語 プ ログ ラム の 準備 
確保 し た 領域 に 機械 語 プ ログ ラム を 準備 する 主 な 方 法 と し て は 次 の 3 つ 
が あり ます 。 
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1. モニ タ を 用 いる 
MON コマ ンド に より 機械 語 モ ニタ に 柳 り 0, モニ タ の 機能 を 利用 
て ブロ グラ ム を 書き 込む (PC-8001MKII ユー ザー ズ マ ニュ アル 参照 )。 
2. CMD BLOAD に より ロー ド す る 
既に CMD BSAVE に より セー ブ さ れ て いる 機械 語 プ ログ ラム を ロー 
ド す る 。 
3. POKE に より プロ グラ ム を 書き 込む 。 
比較 的 短い プロ グラ ム で あれ ば , DATA 文 に より 機械 語 プ ログ ラム 











を デー タ の 型 で 表現 し て お き , それ を READ 文 で 読み 出し た 後 POKE 
文 に より 書き 込む 。 





ー ン 徹 仙 
(RET) を 用 いな けれ ば な り ま せん 。 

2. USR 関数 で 機械 語 ル ー チ ン に 引き 渡さ れ た 引き 数 が 文字 
列 で あっ た 場合 に は , (DE) レジ スタ ペア に 次 の よう な 3 バイ 
ト か ら な る スト リン グ ・ デ ィ ス クリ プ ブタ と 呼ば れる 領域 の , 
先頭 の アド レス が 入り ます 。 

(&4) スト リン グ ・ デ ィ ス クリ ブタ の 最初 の バイ ト は その 文 
字 列 の 長き (0 か ら 255) を 保持 し ます 。 
(b) 2 番目 の バイ ト は 文字 列 の 置か れ て いる 先頭 アド レス 
の 下位 8 ビッ ト を 保持 し ます 。 
c) 最後 の バイ ト は , 文字 列 の 置か れ て いる 先頭 アド 
の 上 位 8 ビッ ト を 保持 し ます 。 
機械 語 ル ー チ ン で は この 3 バイ ト の スト リン グ ・ デ ィ ス ク 
リフ タ を 書き 換え て は な り ま せん 。 ま た スト リン グ ・ デ ィ ス 
クリ フタ に よっ て 指 さ れ る スト リン グ の 内 容 は 変更 する こと 
は で きま す が , その 長 さ を 変更 し て は な り ま せん 。 
3. 機械 語 ル ー チ ン か ら BASIC に 戻る 時 に は , 呼び 出さ れ た 
寺 と スタ ッ ク ボ イン タ (⑤P) の 値 が 等 し く な っ て いな けれ ば 
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め ま 和 0 ん 。 

機械 語 ル ー チ ン が 呼び 出さ れ た だ 時, スタ ッ ク 領 域 と し て は 
8 レベ ル (16 バ イト ) 分 だ け 利 用 で きる よう に 設定 され て い 
ます 。 もし, 機械 語 ル ー チ ン 内 で より 大 き な ス タッ ク を 必要 
と する 場合 に は , ルー チン 内 で 独 目 に スタ ッ ク を 用 意 し な け 
れ ば な り ま せん 。 ま た , この 時 , BASIC に 戻る 時 に スタ ッ ク 
ポイ ンタ を 戻す こと を 忘れ て は な り ま せん 。 





.J USR 関 数 の 呼び 出し 






た だ し < 番号 〉 は 0 から 9 まで の 数 値 で , 引き 数 は 任意 の 数 値 式 
文字 式 で す 。USR 関数 は 書式 上 | き 数 >〉 を 必要 と し ます の で , 呼び 出さ 
れ た ルー チン が 引き 数 を 必要 と し な い 場 合 で も , ダミ ー の 引き 数 を 与え る 
必要 が あり ます 。 

USR 関数 が 呼び 出さ れ , 対応 する 機械 語 ル ー チ ン に 制御 が 移っ た 時 , A 
レジ スタ は , 渡さ れ た 引き 数 の 型 を 示す 値 を 持っ て いま す 。 そ の 値 と 意味 
は 次 の ぴよ ま の に な る て で てい ます 。 
A の 値 引き 数 の 型 

2 2 バイト の 整 3 

3 文字 列 弄 

1 単 精度 型 

8 倍 精度 型 

引き 数 が 文字 列 の 場合 に は [DE] レジ スタ ベア は , 3 バイ ト か ら 
成る スト リン グ ・ デ ィ ス クリ プ ブタ を 指し て いま す ( 前 節 参照 )。 

引き 数 が 数 値 の 場合 に は , 〔HL] レジ スタ に 浮動 小数 点 ア キュ ー 
ムレ ー タ (FAC) と 呼ば れる 8 バイ ト の 領域 の 5 バイ ト 目 の アド レス 
が 入っ て いま す 。 実際 の 引き 数 は , この FAC の 内 に 各 型 に 応じ て 
以下 の よう に 格納 され て 渡さ れ ま す 。 








(2 の 補 数 表現 
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・ 整 数 型 の と き 
FAC の 5 バイト 目 ([HL] レジ スタ ペア が 指し て いる と ころ ) に 引き 
學 の 下位 8 ビット , 6 バイ ト 目 に 上 位 8 ビッ ト が 入り ます 。 
・ 単 精度 実数 型 の と き 
FAC の 8 バイ ト 目 は 指数 部 に な っ て お り , (指数 一 128 ) の 値 が 入り 
ます 。 小数点 は 仮数 部 の 最上 位 ビ ッ ト の 左 に ある と 想定 し ます 。 7 バ 
イト 目 は 仮数 部 の 最高 部 7 ビッ ト を 保持 し ます 。 こ の バイ ト の 最上 位 
ビッ ト は 付 号 を 示し , 0 で 正 , 1 で 負 を 表し ます 。 6 バイ ト 目 と 5 バ 
イ トト 目 は それ ぞ れ 仮数 部 の 中 部 と 最低 部 の 8 ビッ ト を 保持 し ます 。 
・ 倍 精度 実数 値 の と き 
5 バイ ト 目 か ら 8 バイ ト 目 まで は 上 単 精度 実数 型 と 同じ よう に 指数 部 
こ 仮 数 部 の 上 位 3 バイ ト が 入り ます 。 1 バイ ト 目 か ら 4 バイ ト 目 に は 
仮数 部 の 下位 4 バイ ト が 入り ます 。 





リン グー スト リン グ 領 城 





人 精 度 実数 型 








整 毅 弄 





単 精度 実数 型 
僅 精 度 実数 型 。 
浮動 小数 点 ア キュ ムレ ー タ (FAC) 

USR 関数 が BASIC に 値 を 返す に は 関数 値 を FAC に 設定 し て や る こと で 
行え ます 。 通 常 返す 値 は , 引き 数 と し て 渡し た 値 と 同じ 型 に な り ま す 。 し 
か し , BASIC の 持っ て いる MAKINT と いう ルー チン を 呼べ ば , [HL] レジ 
スタ の 整数 値 を 関数 値 と し て 戻す よう に 強制 する こと が で きま す 。 
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MAKINT ルー チン は 機械 語 プ ログ ラム か ら 戻 る 時 に 次 の 様 に 用 いま す 。 


CALL 23H : MAKINT ル ー ナ チン を 呼ぶ 


100 
より 
120 
130 
140 
1 っ 0 
160 
170D 
18U0 
120 
200 
210 
2Z0 
Z30 
240 
Z つ U 
2Z60 
Z70 
ノ / ご U 
ノ ツ U 
300 
310 
づ 2Z0 
う 330 
340 
3 っ 0 
360 
70 
づ 8U 
320 
400 
410 
420 
430 
440 
4 ユ 0 


460 


447U 
48U 
450 
っ 00 
っ 10 
っ ZU 
っ 3D 
っ 40 
うっ 0 
っ 60 
う 70 
っ 80 
っ 20 
6UU 
610 
62Z0 
630 
640 
6 っ U 
660 
670 
680 


: 機械 語 プ ログ ラム か ら BASIC に 戻る 


CLEAR 300 ,&HBFFF 
DEFINT A-YiDEFSTR 7Z7:DIM 7Z ま (1) 

DEF USR=&HCO000 : GOSUB 420 

Z( ロ )=”ー へ ZZ(1)= リ トン ンド 

ZG= "rr 音 2:Z ニ 1 7Z じ =「 

CUNSULE 0.25.0,1:MEIDTH 80,25 

CUOLOR 6,32,0 

PRINT CHR も ( 12 ) 

N=U :K= ニ 38 : し ニコ ゴツ 9:A= ニ 23 :B=24 :6=1 : =0 

LUCATE K,BiPRINT ZS 

LUCATE L,AiPRINT Z: 

H け =U 

LOU じ CATE 上 H。NiPRINT Z(H MOH 2): 

IF M THEN GOSUB 270:GOTO 250 

1F INP(9)=&HBF THEN UM=1 ELSE GOSUB 410 
LOUCATE H。N:PRINT 7ZC 

H=H+1 : IF H>7Z6 THEN 210 ELSE 220 

= ニ 全 1 1F A>=N THEN 310 

A=23:M り =0 iLOCATE L。NiPRINT" " 』 

LUCATE LJAiPRINT Z: 

RETURN 

AU=&HF 328+A※120 iD=USRC AD): IF 日 THEN 330 
RETURN 

FOUR I=0 TO 5 

LUCATE LNiPRINT XX jiBEEP 1:GOSUB 410 
LUCATE L,NiPRINT” iiBEEP 0zGOSUB 410 
LOUCATE L-1,N:PRINT" 旧 6 
LOCATE LN+1 :PRINT  "』 

NEXT [:A=23 日 = アア 7 : り =0 

LUCATE 上 L,AkPRINT Zi 

RETURN 

FUR J=O0 TO 10:NEXT JsRETURN 
FUR AD=&HCOO00 TO &HC027 
READ _ DA:POKE AD 。DA 

NEXT Ah 

RETURN 

DATA &HFE。2 - 電 

DATA &HCD 敵 

DATA &H5E H 

DATA &H23 ・ 

DATA &HS56 > 

DATA &HE5 - 

DATA &HEB ( 

DATA &H7E 

DATA &HFE 。,&H76 EN 

DATA &HCAJ&H1F 。&HCOi「 

DATA &H36,&H96 人 

DATA &H11.&H78。0 回 

DATA &H19 1 ADD 
DATA &H36,&H20 * LD 
DATA &HE1 - 
DATA &H36,0 
DATA &H2B 
DATA &H36,0 
DATA &HS3E。,2 
DATA &HC9 
DATA &HE31 人 
DATA &H36,&HFF 
DATA &H2B * 


2 の 「 「 
ー 


HL 
(HL ) , &HFF 
HL 
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6?0 DATA &H36,&HFF 細 LU (HL ) , &HFF 
98857 5 還 
USR 関数 を 使っ て , UFO を 打ち 落と す ゲ ー ム を 作っ て み ま し た 。 ス ペー 
発射 され ます 。 
弱 械 語 の ブ プログ ラム は , DATA 文 で 用 意 し て お き POKE で 
に 書き 込ん を で いま す 。 
機械 語 ル ー チ ン は , ミサ イル の 表示 と , ミサ イル が UFO に 当たっ た の 
凍 か の 判定 を 行い ます 。 行 番号 310 で USR 関数 の 引き 数 と し て , 次 に 
ミサ イル を 表示 する 位置 の VRAM の アド レス を 渡し て いま す 。 機 械 語 ル ー 
チン で は , その アド レス UFO が いる か どう か 調べ , も し いれ ば ー1, いな 
けれ ば ミサ イル を 移動 し て 0 を 返し ます 。 













.4 VARPIR 

VARPTR 関数 は 指定 され た 変数 , バッ ファ の 置か れ て いる 番地 を 返し 
ます 。 

VARPTR 関数 の 引き 数 と し て 数 値 変 数 名 が 写 え られ た 時 に は , その 変 
数 の 値 の 最 下 位 ア ドレ ス を 返し ます 。 上位 バ イト は 下図 に ボ す よう に この 
番地 以降 に 入っ て いま す 。 ま た , 文字 変数 名 が 指定 され た 場合 に は スト リ 
ング ・ デ ィ ス クリ プ ブタ の 先頭 番地 が 返さ れ ま す 。 














変数 テー プル 昌 | VARPTR の 値 て 示さ れる 


om 





2 イト 42 イ 7 ト 





2 バイ ト 3 バイ ト 
スト リン グ デ ディスクリプタ 





文字 列 格納 アド レス 
文字 列 の 長き 
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急 数 と し て 配列 要素 が 指定 さ 
地 が 返さ れ ま す 。 

引き 数 と し て バッ ファ 番号 が 与え られ た 場合 に は その バッ ファ 領域 の 
番地 を 返し ます 。 こ の 領域 の 最初 の 9 バイ ト は BASIC の 作業 用 の 領域 と 
な っ て お り , ファ イル と の 入出 力 に 用 いら れる 256 バ イト の 領域 は , 
VARPTR 関数 の 値 に 9 を 加え た 番地 か ら 始 まり ます 。 


C. エラ ー コ ー ド 表 


Bad alloration table | 64 | フロ ッ ピ ィ デ ィ ス ク 内 部 の FAT が | 
Bad drive number と ドラ ライ ブ 指 定 が 誤っ 0 い る 。 22607 


BadFileData 。 | 25 | ファ ィ の の 叶 ず コザ アー ま 
ら が - 生生 


ad 人 n34rmne | 62 | ァイル 名 の 指定 が まち が っ て いる . 





Bad file number 52 | オー プン し て いな い フ ァイル や 起動 | 
時 に 指定 し て いな い フ ァイル を 参照 | 

し た 。 

Bad file mode 54 シー ケン シャ ル で オー 02 ファ イ | 
| | に 対し て ラン ダム アク セス を し よ | 
うと し た 。 まだ た は その 逆 。 | 


サー フェ スト ラッ ク , セク タ 番 号 の 指 | 
| 定 が 誤っ て いる 。(DSKO$, DSKIS) 


CONT 命 令 に よ っ て 実行 








| Bad surface track/ 
| sector 


















行 を 再開 する 
こと が で き な い 。( ポ イン タ の 値 が 壊 
iM 


| 后 辺 機器 と の 入出 力 の た め の バ ン フ ァ 
が オー バー フロ ー し 2 。 


Cant continue 



















| Communications Buffer 
1 Overflow 
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消去 済 の レコ ー ド を を アク セス し よう 
MS 


アス キー 形 式 の フ yi ィ ル を 読み 込む | 
| 際 に ダイ レク トス テー トメ ント が 存 
| 在 し た 。 | 


| mount き れ て いる ディ スク に 対し て 
| mount を 行っ た 。 


デル ベン が 接続 きれ て いな いと さき (Neo) 
DISK- ASI し の 全 HH 征 令 を 実行 訂 ー 





| Disk already mounted 」 
Disk BASIC Feature 


| Disk full 










| nount き れ て いな いい ディ スク に 対し | 
| て ケ ク ギ セス レ だ 。 


ゲ ィ スク と の 人 出力 中 に エ ェ エラー がき | 
| は オナ キャ ナイ バ 箇 で あり 回 人 
ゼス 
出 ナ 
コク 





Disk not mounted 


Disk 1/O Error 


可能 AE CZ ディ 久 ク 
3 呆 ま まき 





IDivision by zero 
FIELD overiow 
File already exists 58 | NAME 文 に よっ て 変更 し よう と し た 


し 名 が 既に 存在 し て いる 。 


ざさ 4 し て ゆい る プ ザ イル に 





File already open 


File not found | 53 | LOAD. SAVE KITIT な ど で 現 在 の 

| 「 ディ スク に 存在 し な い フ ァイル を 指 | 
ーー の 
File not OPEN 7] | オー プン され て いな い フ ァ イ ル を 参 

| 昌 し よう と し だ 。 
書き 込み 条 上 属性 が 付け られ て いる 

| | ァイル に 書き 込 も うと し た 。 

lllegal direct | 12 が オレ ゲト 穫 こ y ド で 使用 で き な v 文 | 


テー 















File write protected 










よび 関 女 に お いて 
5. Cc MY の 。 


IIllegal function call 


| Input past end 


| Internal error_ 

Line buffer overflow 
| Missing ODerand 
NEXT without FOR 


No RESUME 


| Out 「 of data 


Out of memory 


Out of string SDaCe 
Overflow 

Port Mt Initialized 
IPosition 了 On Screen 


KRedimensioned array 


| Rename across disks 


| RESUME without 
CTTOT 


RETURN without 
| GOSUB 


Sequential after PUT 


還 2 ェ イ し 中 の 全て の アー タ を 読み 


し た 後に 。 さら に 入力 文 が か うっ Pe 


X エ が 正しく 対応 し て い 
(NEXT が 多い 。) 


演算 結果 や 入力 され た 数 値 が 
れる 寺 囲 を 越え た 。 


1 1 ンタ フェ ー ス 用 の LSI の 機能 設 征 


な され て いな い . 


邊 定 し た : cMN ー ソ ル 人 “ 


の 6 MV 。 


| NAME に お いて . 異 な る ド 


削 で リネ ー ム し よう と | 


ー 処 理 ル ー チ ン に 制御 を 移 き な 
か 0 に RESUME 文 が ある 。 


COSUB RETURN が 正しく 対応 
し て いな い 。(RETURN が 多い 。) 


| PUT 文 実行 後 . レ シー ケン シャ ルフ ァ ィ 





本 人 委 オプ 遇 し よう で も し な 。 


シゲ シン ャ ル 人 上 帳 力 以外 (は 行っ て 


は な ら な い 。 


String formula too ) | 文字 式 が 複雑 すぎ る 。( カ ッ コ の ネス 
complex ティ ング が 深 す ぎる な ど 。) 


String too long 15 1 つの 文字 変数 内 の 文字 数 が 225 文 
子 を 越え て いる 。 


SuDScript Out of range 配列 変数 の 添字 の 値 が 規定 の 男 囲 か 
ら 外 れ て いる 。 
Tape read ERROR 










式 の 左辺 ・ 右 辺 , 関数 の 引数 な ど に お | 
いて 変数 の 型 が 一 致し て いな い 。 
飛び 元 と し て 必要 と され る 行 番号 

(GOTO, GOSUB な どの 飛び 先 ) が 
仔 在 し な い 。 
| DEFFN 文 に よっ て 定義 され て いな 

] い ユ ー ザ 関数 を 引用 し よう と し た 。 
ー ジ の 定義 され て いな い エ ラ 












D. ク グラフィック シン ボル 





古町] 

分 | 秒 

レト IXI4 9 箇 | 1 ) 

LLP 回 了 eIolyI* 咽 TL) [E 

ーー ピー 計画 層 LTLTLTー ) 
し | 


人 1 


_L M A/ 
LL IILI 年 時 
し 上 トル MM 


LULJ 





し 
ロ 」 
日 
m 邊 
= 


HH 


し 1 


E. キャ ラク タコ ー ト 












EE 
Flv| rly 較 

3 回 ml elw| ly 

mmm slmlxlmls エビ レト Te 
回 思 外 馬 回 回 回 回 目 還 配 四 四 四 品 較 
内 円 回 回 回 加 申 還 四 上 E 本 PE 回 
曲名 四 回 回 FEI 本 較 回 回避 関 
回 回 困 四 回 回 回 加盟 配 回 四 【 ) 較 
plm- に [に wisD 財 xlslEIO 
ml Es に PE に 較 生 ks レー 
mishlzhileLT HELLELNT 


F. ジャ ン バ ハバ スイ ッ チ と デ ィ ッ プス イ ッ チ の 使い 方 


ディ ッ プ スイ ッ チ 1 未 使 用 


ディ ッ プ スイ ッ チ ナ 2 MEMORY WAIT 
レン Ro 
On ……… メモ リリ ー ド サイ クル に 
1 WAIT 動作 を お こ な う 。 
(アク セス タイ ム が 300n sec. 
よ ML る 場合 / 












Ne ッ プ レス イ P' は on に 
し て くだ さい 。 


ディ ッ プ スイ ッ チ 3 一 7 拡張 用 
(ユー ザ は 使用 で きま せん 。 


on……N-BASIC を 選択 


off………N so -BASIC を 選択 





bi ド 
(bit per second ) 


ーー 


Eo 
ア の 
5 の ) 64 の と き 
ak ラク ボス 0 の よ 7D 旨 
ジャ ンマ スイ ッ チ 2 150 ーー 
ジャ ン フ パパ スイ ッ ナ 3 300 75 
ジャ ン フ パス イッ ナチ ナ 4 600 150 
ジャ ン バ パス イッ チ 5 1200 300 
ジ の ジャンパ スイ ッ す 6 2400 600 
- ジ ャ ン パ ス オ ッ チ ィ 7 4800 1200 
ーー ジン ルポ シ 2 スッ 98 9600 2400 


も 


>) 


レ 
を 
と 


トー 
wN 


意 ) ボー トレ ー ト 切り 換え 用 の ジャ ン パ ンス イッ チ は PC-8801 の 
も の と は 逆 に な らん で いる の で 注意 し て くだ さい 。 
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[公売 人 


| カッ コ で 囲 まれ た も の 。 


関係 演算 子 ( く , , ニ な ど ) 
NOT 
| AND 
OR 
XOR 
IMP 


カー ソル を 1 項目 ご と だ へ 移動 きせ ます 。 


CT 上 


CTRLU+J) 


[CTRLI+[KI 


員 + 加 
ICTRL+[MI 
PT 


| CTRL | カー ソル の 位置 か ら , その 行 の 終り を まっ 消し ます 。 
' (ETRU + | 


1 文字 を 削除 し ます 。 [ 識 | と 同じ 働き で す 。 


ブザー を 鳴ら し ます 。 


タプ 位置 まで カー ソル を 移動 きせ ます 。 タ プ 位 置 は 8 桁 
ご と に 設定 され て いま す 。 [TAB] キ ー と 同じ 働き で す 。 | 
ライ ン フ ィ ー ド (LF コ ー ド ) を 挿入 し ます 。 

カー ソル を ホー ム ポ ジ シ ョ ン ( 左 上 スミ ) に 移動 さき せま す 。 
SHIFT | 十 | 遇 本 | と 同じ で す 。 

テキ スト 画面 を クリ ア し ます 。[ 忠 疹 ] と 同 し で す 。 


カー ソル を 1 項目 ご ど に 右 へ 移動 きせ ます 。 


スペ ー ス を 挿入 し ます 。 [SHIFT]+ | 里 ] と 同じ で す 。 


実行 を 一 時 中 断 し ます 。 
カー ジル を 1 つ 右 へ 移動 きせ ます 。 


=| | カー ソル を 1 つ 左 へ 移動 きせ ます 。 


| カー ソル を 上 の 行 へ 移動 きせ ます 。 
| ター ノル を 下 の 行 へ 移動 させ ます 。 
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| . 漢字 JIS コ ー ド 表 


半角 文字 一 覧 表 

0 1 2 3!4 5 6 7i8 

0020 。 !・ fiS 多 8 1 
0030 0 1 2 314 5 6 718 
0040 A B CiD E F GIH 
0050 P Q R SIT U V WIX 
0060 2 b c  d e f g  h 
0070 p qd r sit も 
0080 1 を ぁ | ぃ 
0090 - あい 3! え お ぉ か き !( 
00AO 中 中 ブ 中 
00B80 一 ア イ ウエ オ カ キリ ク 
00CO0 タ チッ ツ テ 」 ト ナ = ニ ヌメ ! ネ 
00D0 ミ ム メ モ ! ヤ ュ コ フェ リ 
OOEO0 た ち つ て (と な に ぬ 1 ね 
OOFO み むせ め も や ゆめ よ ら !) 
0 1 2 3!4 5 6 718 
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2530 | グ ケ ゲ グ ゲ コ 
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2470 | ゐる を ん 


な |2eo| む めも ゃ 





カ 


ヌメ 不 ノ 2 ヽ 
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年 そ ダン 


じ D EE F 
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ーー _- - 
キイ キキ トキ サト キオ 


困 裕 安 貞 挨 叶 委 間際 杏 


L ( 

以 伊 位 依 停 囲 | 

天 成 財 作 意 肝 易 符 為 長 異 移 維 弥 邊 

革 胡 請 加 遺 医 井 中 育 孝 磯 老 浴 
稲 次 攻 鯛 | 刀 印 咽 具 | 内 如 飲 注 骨 陰 

| 
。 羽 汗 ぼ 雨 鵜 及 廿 
を 厩 浦 反 問 噂 二 運 


錠 者 | 人 系 映 眼 栄 氷 泳 | 彰 爾 鍋 閑 


すま お すす お 
pl 園 場 奄 宴 延 況 控 援 沿 演 科 始末 燕 猿 緑 
浮 苑 菌 遠 欠 箇 塩 | 


O | 2 314 5 6 7I8 9 A BIlC D E F 
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oi 2 3l4 567i8 9 ABlCDpEP 
[ 誰 電 上 央 順 往 記 

押 星 横 ! 欧 殴 王 備 ! 袖 著 丁 黄 | 岡 沖 贅 億 
屋 億 友和 Z 俺 卸 | . 温 穏 音 
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[ ( 下 化 仮 何 
伽 価 佳 6 秒 嫁 | 家 邊 E 科 明和 ほ 歌 河 
| 光悦 
ny れい に キト ルキ オッ レ 雅 僚 坊 
介 会 解 回 | 塊 載 因 快 ( 怪 悔 秋 検 ! 太 協 区 | 
経 星 械 | 答 火 夫 沸 絵 草 芝 開 」 階 上 貝 肌 効 | 
條 玉 害 涯 由 桃 症 昌 革 街 設 鐘 | 電 束 時 
| 柿 開 釣 形 了 各 席 下 失格 校 蔵 首 確 和 
3350 | 覚 | 角 撤 溢 部隊 隔 革 学 皇 楽 額 絹 掛 笠 欄 
50 | 模 避 航 海溝 愉 押 清 渦 病 机 轄 人 
| 叶 桃 樺 暫 免 電 浦 釜 録 噛 嶋 西 茅 准 

移 M TI 所 章 , 1 中 訪 ' 奈 刊 勘 勧 項 喚 堪 事 
完 巨 赴 十 幹 加 感 (人 換 敢 和 相 款 歓 
| 汗 漢 潤 準 環 甘 監 看 竿 党 し も むい も 
発 梁 仙 唱 般 問 開 関 隔 起 館 隊 九 人 


o| 能 玩 癌 眼 震 折 放 | 基 6 串 明 





3570 | 巨 揚 損 省 陳 』 庶 放 人 サキ 各 


oO 1 2 3i4 5 6 7!g 9 A BiC D E F 


1 3770 | 侯 俸 健 


O |I 2 3! | 4 ら ら 6 7! 8 9 A B CC DD F 
3620| 供 依 備 ! 喝 腕 共 CI 必 卿 叫 畜 境 内 
3630| 旨 愉 恭 挟 教 橋 況 | 狂 狭 矯 胸 償 興 
co 色 鶴舞 鑑 W 淫 発 遇 選曲 季 相 # 
| 動 多 四 印 打 座 人 鈴 勢 禁 高 筋 繋 訂 
3eeol 亮 近 金 吟 | 銀 [ 











ea 
! 係 傾 刑 見 圭 : 
掲 携 散 景 桂 ! 渓 吐 稽 系 
HHN 
7 茶 人 引 | 


も ] デー = 
電 


(や 





革 革 路 導 


叶 洲 味 





貴 開 長 





ET 2Hy 










mm 思 
ーー | 
1 








3s2o| 検 権 
3830| 鍵 険 顕 
3840 時 形 限 





凶 党 六 京 遇 刻 | 


ai 膝 
河 記 
8 E 

JHG 
短 
通 


還 f 個 十 呼 国 嬉 也 己 庫 」 

1 3850[ 湖 狐 身 待 | 』 攻 計 中 鉛 必 」 雇 設 
|3seo| 缶 午 呉 吾 娯 後 御 悟 醒 格 期 其 語 誤 
mol を 鯉 委 俊 際 修 侍 人 了 ゆ 効 | 厚 F 
3920| 語 喉 寺 好 孔 | 工 巧 ! 幸 た 康 店 
3930| 7、 恒 慌 交 控 攻 是 晃 更 杭 校 | 本 書 江 潤 
po| 洗 港 潮 中 電 和 H 柱 導 4 き 朋 須 
39so| 膝 育 % 荒 | 衡 講 由 郊 酵 鉱 | 人 
高 洪 訪 ぢ 合 | 搭 漂 豪 」 芽 

] 大 還 db 里 : 拓 凍 劉 | 久 ! 号 。 


を 名 人 、 | 竹生 症 面 
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OO 1 2 3」4 5 6 7i8 9 A BIC D E F 

比 頃 今 ! 困 電撃 婚 眼 想 皆 昆 根 梱 混 痕 
[ 
/ 





l [ 
| 

























| 佐 叉 眉 差 在 沙 天 砂 誕 
JAol 溢 邊 座 挫 ! 人 供 再 最 嗣 朗 妻 宰 形 オ 採 栽 
3AS0| 蔵 済 災 和泉 居 砕 砦 祭 斎 細 茶 裁 ! 載 際 剤 在 
3Aeo| 材 罪 財 浅 坂 阪 直 材 請 咲 崎 埼 (大 藻 作 削 

3A70| 貴 搾 昨 相馬 入 末 桜 鮭 笹 息 冊 刷 
察 拶 撮 擦 札 殺 和 苺 早 鯖 拓 合 餅 四 果 
mao| 三 傘 参 山 公 艇 機 際 場 産 移 訂 家 


5p40| 酸 無 斬 暫 | 残 「 


| 

3B40 ( 仕 仔 伺 ! 全 刺 司 更 | 四 士 始 
mol 全 子 選 市 師 志 思 紫 支 若 施 皆 校 下 
speo| 死 氏 獅 祉 」 私 糸 紙 柴 ! 肢 脂 皇 視 詞 詩 試 革 
語 次 腸 賑 飼 歯 事 似 侍 児 字 寺 | 慈 持 時 

次 滋 まる iobBMIh を も 
sa0| 式 識 具 答 軸 実 まま 七 叱 執 失 療 室 本 湿 漆 
oeo| 疾 質実 部 篠 伸 栄 芝 ! 展 薬 結合 写 射 失 才 
scso| 斜 煮 社 紗 者 謝 車 遮 紫 邪 借 勾 尺 析 知 稀 
FC 利和 遼 主 史 手提 交 伯 衝 
ol 腹部 酒 首 価 受 呪 寿 遂 樹 緩 策 囚 収 周 

寺 就 州 修 惹 拾 洲 | 秀 秋 終 繕 習 臭 式 此 
pad| 科 散 汐 肛 四半 週 人 酬 集 酸 仕 住 充 十 従 戒 
ml 科 汗 波 湯 | 重 久 叔 加 宿泊 初 和 記 吉 
pso| 出 条 玉 俊 遇 春 明 竣 送 駿 准 件名 桶 狗 光 
3Deol 準 潤 唐 純 」 巡 導 酔 順 処 初 所 直 | 嗜 浴 庶 緒 
20l 署 書 著 攻 庄助 叙 女 庁 徐 起 鈴 除 傷 人 

勝 区 借 ! 如 員 商 唱 | 管 疾 凌 妨 符 将 小 少 


| | 
O Il 本 まゆ 1 時 = 生計 きま 
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時 


3sF20| 拭 植 殖 織 洋 | 食 角 介 信 侵 - 
mao| 皇 娠 須 審 慎 振 新 計 森 株 愉 申 疹 真 
re 神 系 紳 臣 応 閑 親 記 | 身 辛 進 針 震 人 仁 妨 


meo 鹿 王 穫 甘 加 息 誠 押 













| 
| 条 茸 基 族 図 
唱 吹 垂 帥 誰 水 炊 隆 砕 買 誤 遂 本 備 押 随 
瑞 髄 崇 区 枢 直 災 杉 相 芝 誠 雀 裾 
演 拉 0 














[ 
| 





世 瀬 瑞 十 | 姜 制 勢 申 征 性 政 
性 捕 李 李 下 清二 痢 西 
逝 醒 ! 青 茜 科 底 信 席 民 距 た 人 析 
石積 籍 績 | 符 責 赤 遇 呈 頒 切 提 | 楼 摂 折 設 

放 節 説 雪 絶 若 遇 先 千 占 定 専 失 川 戦 
避 栓 株 小 洗 近江 前 畑 旋 航 線 

織 美 腺 ! 狂 船 薦 設 | 農 践 選 居 ! 銭 銚 剛 鮮 
13 前 善 洒 然 全 禅 繕 脂 林 











「 oz 314 5e7Ie 9 Alo E F 
3E30 商 庄 床 万 昌 承 抄 押 学 六 具 昌 唱 松 相 
トキ ci も ト ま も b ま まま に キ 称 草 
ms0 笑 粧 紹 肖 高 尊 薫 衝 訟 証 記 i 詳 象 錠 将 
3sEe0ol 針 殺 鐘 障 科 上 元 氷 乗 冗 剰 城 葛 壌 娠 
3E70 | 情 接 条 杖 穫 状 量 税 談 醸 錠 ( 嘱 地 侯 
人 












純 喝 


n 度 


宮 
隔 避 諾 
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IN 





。 喝 彰 上 明 中 
ol 表門 中 林 邊 粗 補間 訴 昌 開 』 
450] 双 鼓 念 吾 壮 奏 爽 打 | 層 皿 惣 想 捜 掃 挿 # 
TO| 操 早 間 巣 本 槽 演 | 名 首相 訟 中 総 総 取 
章 荘 葬 茶 装 走 送 道 錯視 騒 像 増 憎 


O | 2 3!4 5 6 7!a 9 A Blc D E F 
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po| 和 を 朱 択 拓 ! 和 | 押 江 諾 茸 」 不 晴 
叩 但 達 展 礁 脱 上 壁 辿 棚 人! 紳 魚 椅 褒 
4330| 地 単 嘆 坦 | 担 探 旦 | 淡 江 大 知 中 江 綻 豚 
4340| 胆 重 誕 鍛 ( 団 壇 弾 断 明 人 自 談 
| 

( ( | 値 知 地 
to] 区 恥 池 ( 疾 稚 秋 致 物 遅 務 築 畜 竹 所 革 
遂 秩 室 茶 | 婚 着 中 仲 宙 起 抽 久 柱 注 虫 東 
詩 丁 鋳 入居 沙 猪 補 閉 貯 」 兆 油 喋 龍 
420| 帖 帳 庁 甲 張 彫 徴 懲 挑 輸 朝 | 潮 謀 町 眺 
4oo| 聴 厩 腸 調 謗 超 員 銚 長 項 鳥 動 捗 直 朋 
4440| 沈 珍 賃 人! 、 

















号 人 偵 刺 韓 定 上 庭 廷 系 
47o| 側 抵 挨 提 ! 移 汗 横 程 締 艇 訂 謗 路 通 
認 葬 釘 上 岳 抽 滴 的 笛 適 錆 哲 
4530 和幸 送 鉄 典 概 居民 店 添 細 疾 貼 転 
点 伝 殿 汰 ( 田 電 、 、 

O | 2 3!4 5 6 71I8 9 A BIC D EE F 








付 一 29 


O | 2 3「4 5 @6 71」8 9 A BiC D E F 
兎 吐 増 塗 知 層 ! 徒 寸 杜 渡 
ero 登 第 時 肌 都 氏 算 信夫 度 土 私 剖 倒 混和 
Seo| 凍 刀 唐 培 燃 奏 容 島 品 悼 投 描 東 桃 橋本 
4570| 盗 海 湯 洒 燈 当 語り 廊 き 倫 簡 糖 統 到 

。 革 攻 朋 」 討 膳 時 穫 穫 頭 有 関 人 
eo 動 同 生前 憶 搭 油 腹 章 胴 攻 道 全幅 論 較 
4e40l 得 舘 漬 特 督 到 篤 毒 独 読 栃 株 | 上 突 概 届 | 
たり た KEY すす [すす 
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4 還 
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| 尼 末 定 匂 上 肉 虹 補 日 乳 入 
oO 人 












| 播 形 相 派 替 人 本 | 鳥 馬 | 
| 作 許 廃 拝 排 敗 本 大 導 肺 敬 配 倍 培 媒 梅 
76o| 様 召 句 買 売 賠 隊 中 則竹 知 萩 伯 羊 博 拍 
yg| 相 泊 白 術 邊 毅 尊 追 唱 漠 爆 縛 英 駿 

| 国 箱 奏 箸 筆 答 筐 内 肌 畑 旦 I 八 鉢 溢 発 
Aao| 隙 半 伐 有 拓 和 E 関 鳩 断 境内 隼 伴 判 半 反 


0 | 2 sl4 5 e 7e 5 ABlcpEF 
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4840 | 上 帆 撤 役 池 江 mi 班 人 | 般 沙 販 重 
4ss0 | 来 類 頒 飯 挽 晩 番 盤 販 番 秋 



















( 藤 ! 卑 否 妃 棄 
役 悲 扉 批 LE 非 斐 比 泌 療 皮 碑 秘 | 克 能 肥 被 
時 軟 何 非 展 樋 巡 備 必 徴 杉 昆 本 中 美 
桁 柏 匹 堪能 彦 除 美 肝 天 必 事 当選 
| 4930 槽 妃 友 紐 白 診 > 伝 と | 標 水 ? 水 束 表 評 タリ 
4940| 遍 描 病 秒 錯 仮 森 星 鮨 品 備 ! 張 浜 瀬 質 


「| 
mo 了 頻 擬 折 | | 













ー | | 
由仁 電 天 名 布 ( 府 怖 扶 敷 
HH 
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J. 予約 語 


と と に あげ た 予約 語 は , Naso-BASIC, N-BASIC で , 特定 の 意味 を 持 
らち 。 変数 名 な ど に 使う こと は で きま せん 。 


A AND DSKO$ /P) 


ATN 
ASC 
AUTO 
ATTR$ 


BCD$ 
BEEP 
CONSOLE 
CLOSE 
CONT 
CLEAR 
CLOAD 
CSAVE 
CSRLIN 
CINT 
CSNG 
CDBL 
CVI 
CVS 
CVD 
COS 
CHRS 
CMD 
COLOR 
DATA 
DIM 
DEFSTR 
DEFINT 
DEFSNG 
DEFDBL 


E 


ト 


DELETE 
DSKI$ 
DSKF 
DEC 
DATES 
END 
ELSE 
ERASE 
ERROR 
ERL 
ERR 
EXP 
EOF 
EOV 
FORMAT 
FOR 
FIELD 
FILES 
FN/ 
FRE 
FIX 
FPOS 
GOTO 
GO TO 
GOSUB 
邊 ! 


HE X$ 
INPUT 
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INT 
INP 
IMP 
INIT 
INKEY$ 
ISET 
IRESET 
IEEE 


KILL 
KEY 
LET 
LOCATE 
LINE 
LOAD 
LSET 
LPRINT 
LLIST 
LPOS 
LISTEN 
LIST 
LFILES 
L0G 
L0C 
LEN 
LEFT$ 
LOF 
MOUNT 
MERGE 
MOD 


MKIS RUN TAB( 
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MKS$ RESTONE SW 
MKD$ RETURN fHEN 
MID$ REMOVE TAN 
MOTOR REM TERM 
MON RESUME TALK 
MAT RSET TIME$ 
NEXT 3 USING 
NAME USR 
NM RENUM 
0 RBYTE 上 
VARPTR 

0UT STOP WIDTH 
OM SWAP WAIT 
0 SET WBYTE 
しり SAVE ia 
OCT$ SPC( 
PUT STEP + 
POKE SGN 目 
PRINT SOR ポ 
POS SIN 上 
PEEK STRS 
和 STRING$ M 
he SPACE$ っ 
fe STATUS ー 
PRESET SRO ン 
POINT 旨 

R READ TROFF 


K. メモ リマ ッ プ 


ン の 衣 29- 衣 の 。 
64K バ イト 」 7FFFHT- て owa 1 8000H 
| 16000HL__ ] 


6K バ イト 





0HI 
KOM 1 ROM 2…Na。 -BASIC 
KROM 3… 増 設 用 ROM 


に SEP で ここ で こそ 


年: TP す 上 | 
TFT 
re す 。 


ー FT エーロ ・ = 
| 上 まま = 1 所 台 まき 王 章 ] 





N so -BASIC で 使わ れる メモ リ 


We 中 ER 
エ 1 5 こう PH ae 
FTP LR Mr 
HL ee 財 
ST 
さと 
FT EX 
ト ei 了 
中 5 
由 由 


EE 導 1 も を エト 
Tr ユギ 3 Ed 
FT1 
mm ・ に - ロ 
ET] Pr 
エコ arr 1 こ 
に 1 エビ 便 -H ゴ H 


馬 J 


0HI 





N-BASIC で 使わ れる メモ リ 
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I 

| オプ ショ ン 
1 RAM 

) 32K バ イト 
| 


し. PD780 ニー モニ ッ ク ” 機 械 語 対 賠 表 


8 ビッ トロ ー ド 


SS 回 回 回 回 回 回 回 回 回 回 思 回 還 思 回 回 
| | “ | 寺 DD | FD | 3A | 。 














ED | ED 





7E | 7E | n 


LD (HL), X 
LD (BC), X 
LD (DE), X 


し D 1 失 二 d)」 XX 





1 LD (IY+d)。 X 
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16 ビ ッ ト ロ ー ド 


LD 』 氏 XX 


 LD TIY,X 


LD (nn), X 
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8 ビッ ト 人 算術 論理 演算 MNO ド 和 P 








ーー 人 










EX (SP), HL 


FD 
ADD IY, X 
En EX (SP), 1 え 





et QY | 
IS 回 回避 回 回 回 EiEi 





RRCA| OF 
RLA | 17 | 





| RRA | 1F 
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| JP (HL) 


JP IXX) 
JP (IY) 


CALL X, nn | 


リス ター ト 


RST 20H | E7 
RST 28H 
Rer 0m 



















RSI 36H 





ビッ ト 操 作 


BT] 1, メ 


| BIT 3,X 


BIT ゝ , X 


BIT 6, X 


BIT 7,X 
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| IX | dv 


RES 4.X 





KRES 6, X 


RES 7,X | 


SET 0、X 


SET 1, X 


| SET 3.X 


SET 4、X 


SET 6, X 
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3 
0 





OUT nA 









M. 機械 語 の サブ ルー チン 


ROM に 書き 込ま れ て いる 機械 語 の サブ ルー チン の いく つか を あけ ま 


こ 1 文字 表示 する 。 


キー 入力 が ある まで 待っ 
て , 1 文字 入力 され た ら 
居 る 。 


キー 入力 が ある か どう か 
を 調べ る 。 


プリ ンタ に 1 文字 出力 


まぐ a 


文字 列 を 画面 に 表示 する 。 


BASIC の コマ ンド 入力 待 
ち 状 態 に する 。 
(ウォ ー ム スタ ー ト ) 
モニ タ の コン ンド 入力 待 
ち 状 態 に する 。 


画面 に " ? ? を 表示 し て モ 


ニタ の コマ ンド 入力 待ち 』 


の る の 。 





状態 に 


サブ ルー チ ン の 使い 方 
A レ ジス タ に キャ フク タコ ー ド を 入れ て か ら | 


| CALL 257H を 実行 する 。 
CALL F75H を 実行 する と , A レ ジス タ に 入力 


され だ た キー の キャ ラク タコ ー ド を 入れ て 戻 る 。 


ば A レ ジス タ に 入力 され だ キー の キャ ラフ 
コー ド ,。 キ 一 入力 が な けれ ば ぼ ば キャ リフ 
セッ ト し て 戻る 。 


A レ ジス タ に キャ ラク タコ ー ド を 入れ て か ら 


CALL F7BH を 実行 する と キー 入力 が あれ 
クダ | 
フグ を | 


「 CALL PO 和夫 けず 


HL レジ スタ に 文字 列 の 先頭 アド レス を 入れ . 
CALL 52EDH と 行 す る 。 文字 列 の 最後 に 
は , 00H を 付け る 。 


TP 8H を 実行 する 。 


TP 5C2CH を 実行 する 。 


と れ ら の サブ ルー チン の 使い 方 は 。 PC-8001MKI ユ ー ザ ー ズ マニ ュ ア 


ル の 第 10 章 モニ タ の S コ マン ド と G コ マン ド の 使い 方 の と ころ で 示し た 
サン ブル プロ グラ フラム を 参照 し て 下さ い 。 
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N. 高 解像度 グラ フィ ックス と モー ド 


CMD SCREEN の 起動 時 の 設定 値 
CMDSCREEN 0.0,7 

CMD COLOR の 起動 時 の 設定 値 
CMDCOLOR 3.0 


7 キス ト 画面 
に 依 在 し ます | 





O. カラ ー コー ド に 対応 する 色 ( カ ラー モー ド ) と 
機能 (白黒 モー ド ) 










機能 
(白黒 モー ド ) 










ンー ルレ 

ンー テー ク グレ ッ ツ ドド 

Z ジン 
ンー グレ ッ ト 
リフ ベー 





UN テー シークレット 
リ ノバ パー スプ ブリ 2 グ 
| リバ バース シー クレ ッ ト , 







Il つ つの mm 愉 co ko の 








. 誘導 関数 


Na。 (N)-BASIC が “組み込み” 関数 と し て 用 意 し て いな い 三 角 関 数 の う 
ち , いく つか は , 用 意 さ れ た 関数 を 使っ て 作り 出す こと が で きま す 。 以下 
の 数 式 を 参考 に し て くだ さい (誤差 の 範囲 に 注意 が 必要 で す )。 


99 と する 剛 組み 込み 関数 か ら の 誘導 式 
SEC(X)= 1/COS(X) 











COSEC(X リー1/SIN(X ) 
( 欠 ) 一 1)※1.5708 
ハイ パー ボリ ッ ク ・ | COsH(X)= EXP( 一 X)/2) 


COT(X)=1/TAN(X) " 
| ARCSIN(X)=ATN(X/SQR( 一 X *X1)) 
アー クコ サイ ン ARCCOS(X) ニ ーATN(X/SQR( 一 叉 ※ 十 1) ) 
。 填 1.5708 
ARCSEC(X)=ATN(SQR(X *Xー1))+(SGN 
昌和 ARCCOSEC(X)=ATN(1/SQR(X *Xー1)) 
+(SGN(X) 一 1*1.5708 

アー クコ タン ジェ ント ARCCOT(X) ニ ーATN(X) 十 1.5708 

ハイ パー ポリ ッ ク ・ SINH(X)= ニ (EXP(X)ー EXP( 一 X))/2 

サイ ン 
| 9 シ 
| ハイ バー ポリ ッ ク ・ | TANH(X)=ーEXP( 一 X)/(EXP(X) +EXP 
タン ジェ ント 届 紀 ))* 2 十 1 

ハイ パー ボリ ッ ク ・ SECH(X ー2/(EXP(X)+EXP(X )) 

セカ ント [ 


クノ イフ マー ボリ ッ ク ・ COSECH(X ) ニ 2/(EXP( 又 ) 一 EXP( 一 叉 ) ) 
コ セ カ ント 


ハイ バー ボリ ッ ク ・ COTH(X )=EXP( 一 XX )/(EXP(X ) 一 EXP 
コタ ンジ ェ ン ト トー え /)※ 2 十 1 


ハイ パー ポリ ッ ク ・ | ARCSINH(X)= ニ LOG(X+SQR(X *X+1)) 
アー クサ イン 


ハイ バ パー ボリ ッ ク ・ | ARCCOSH(X ) ニ LOG( 十 SQR(X ネネ 論 ーー] ) ) 
ング 0 し | 


| ハイ パー ポリ ッ ク ・ ARCTANH(X)= LOG((1 十 )/(1 一 多 ))/2 
2 ダン ジェ ン ト 


ハイ パー ボリ ッ ク ・ | ARCSECH(X)= ニ LOG((SQR( 一 X * メオ 1) 十 1) 
アー クセ カン ト /X ) 


2 ルク Nm リッ ク ARCCOSECH(X)=LOG((SGN(X)*SQR(XX* ネ | 
リク 当 ギ カン ド 文士 1 ) 十 1)/ 区 ) 


ハイ パー ポリ ッ ク ・ | ARCCOTH(X)=LOG((X+1)/(Xー1))72 
ソー グ コ グン ジン ジョ ント 
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Q. ソフ ト ウェ ア 上 の 一 般 的 注意 事項 


1. PC-8001 用 の フロ グラ ム を 使用 する と き は , ディ ッ プ スイ ッ チ 8 を 
on に セッ ト し て N-BASIC モー ド で 使用 し て くだ さい 。 

PC-8001 用 の プロ グラ ム を N。。-BASIC モー ド で 使用 し た 場合 , 正常 
に 動作 し な いこ と が あり ます 。 そ の 原因 と し て 考え られ る こと は 。 
① 機 械 語 と サブ ルー チン な ど が ,。N。。BASIC の ワー クエ リア を 使用 し 
て いる , ブロ グラ ム の サイ ズ や , 変数 領域 が 大 きす ぎ て (大 き な 配 
列 を 使用 し て いる 等 ), 実行 する と Out of memory エラ ー を 生ずる , 
な ご が あり ます 。 

PC-8001 用 の プロ グラ ム の うち 割り 込み を 使っ て いる も の は MKII 
を N-BASIC モー ド に し て も 使え な いこ と が あり ます 。 

N。。-BASIC, Na。DISK-BASIC に お いて , 6000H 番地 か ら 7FFFH 番地 
に 書か れ た 機械 語 プ ログ ラム を USR 関数 で 呼び その 値 を CMD の つい 
だ 命令 と STATUS の つい た 関数 の 中 で 使う よう な 場合 は , ① の よう 
に し ます 。② の よう に 直接 使う こと は で きま せん 。 
① 正しい 例 

10 DEFUSR テ &H6808 
15 TMP=USR (0) 
20 CMD VIEW (TMP,1) 一 (100,100) 
誤っ て いる 例 
10 DEFUSR テ &H6808 
20 CMD VIEW (USR (0), 1) - (100, 100) 
4. 市 販 の PC-8001 用 の プロ グラ ム で , ブザー を 使っ て いる も の の 中 

に , カレ ンダ 時 計 を 狂わ せ て し まう も の が あり ます 。 こ の よう な と き 
は , も う 一 度 カ レン ダ 時 計 の 値 を 設定 すれ ば 正しい 状態 に 直り ます 。 

NanDISK-BASIC で は ファ イル を オー ブン し た と き に は 。 フ ロッ 
ビィ ディ スク を 取り 出す 前 に 必ず CLOSE し て 〈 だ さい 。CLOSE 
せ す に フロ ッ ピ ィ デ ィ ス ク を 取り 出す と ファ イル が こわ れ て し まい 


了 


いう 
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0. 


ます 。 

DISK-BASIC で は フロ ッ ピ ィ イデ ィ ス ク を 取り 出す 前 に 必ず 
REMOVE を 実行 し て くだ さい 。 REMOVE せ ず に フロ ッ ピ ィ イデ ィ ス 
ク を 取り 出す と ファ イル が こわ れ て し まい ます 。 

カセ ッ ト テ ー プ に プロ グラ ム を セー ブ し た と き は , 必ず すべ ベリ ファ ィ イ 
し て くだ さい 。 ベ リフ ァ イ は , セー ブ し た 直後 に 行い ます 。 セ ー プ し 
た 後 , RUN し て し まう と その 後 ベ ご リ ファ イ し て も メモ リ 上 の ブフ ログ 
ラム と カセ ッ ト テ ー ブ プ 上 の プロ グラ ム は 一 致し な いこ と が あり ます 。 

カセ ッ ト テ ー プ に セー ブ す る プロ グラ ム の 最後 に は 必ず end を つけ 
て くだ さい 。end が な いと , その ブ プログラム を ロー ド し て も 実行 で き 
な いこ と が あり ます 。 

ー ミ ナル モー ド を 使用 する と き ボ ー レ ー ト を 600 bps 以上 に 設定 
する と , 受信 エラ ー に な る こと が あり ます 。 


10. Na。DISK-BASIC で プロ グラ ム の 実行 中 また は ロー ド 中 に “Out of 


memory エラ ー が 出る と き は , 起動 時 に “How many files?" に 対し て 倫 
える 「 同 時 に オー プン する ファ イル 数 」 を 滅 らし て くだ さい 。 
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